home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / macros / tip / tip-bugs.tex < prev    next >
Text File  |  1993-09-15  |  96KB  |  3,154 lines

  1. % Here the output of program inputd begins!
  2. \def\InputD #1{}
  3. \def\ListInputD{}
  4.  
  5.  
  6. % Here begins "namedef.tip".
  7. % This macro source file is from the four volume series
  8. % "TeX in Practice" by Stephan von Bechtolsheim, published
  9. % 1993 by Springer-Verlag, New York.
  10. % Copyright 1993 Stephan von Bechtolsheim.
  11. % No warranty or liability is assumed.
  12. % This macro may be copied freely if no fees other than
  13. % media cost or shipping charges are charged and as long
  14. % as this copyright and the following source code itself
  15. % is not changed. Please see the series for further information.
  16. %
  17. % Version: 1.0
  18. % Date: May 1, 1993
  19. %
  20. %
  21. % This source code is documented in 19.1.8, p. III-73.
  22. % Original source in file "tokens2.TEX", starting line 414.
  23. \wlog{L: "namedef.tip" ["tokens2.TEX," l. 414, p. III-73]}%
  24. % This file DOES belong to format "texip."
  25. \catcode`\@ = 11
  26. \def\NameDef #1{% 
  27.     \expandafter\def\csname #1\endcsname
  28. }
  29. \def\NameEdef #1{%
  30.     \expandafter\edef\csname #1\endcsname
  31. }
  32. \def\NameGdef #1{% 
  33.     \expandafter\gdef\csname #1\endcsname
  34. }
  35. \def\NameXdef #1{% 
  36.     \expandafter\xdef\csname #1\endcsname
  37. }
  38. \def\NameNewDef #1{% 
  39.     \if\NameDefinedConditional{#1}% 
  40.         \errmessage{\string\NameNewDef: "#1" already defined.}% 
  41.     \fi
  42.     \NameDef{#1}% 
  43. }
  44. \def\NameReDef #1{% 
  45.     \if\NameDefinedConditional{#1}%
  46.     \else
  47.         \errmessage{\string\NameReDef: "#1" never defined before.}% 
  48.     \fi
  49.     \NameDef{#1}% 
  50. }
  51. \def\NameUse #1{\csname #1\endcsname}
  52. \def\NameUseFlagUndefined #1{% 
  53.     \if\NameDefinedConditional{#1}%
  54.         \NameUse{#1}%
  55.     \else
  56.         \errmessage{\string\NameUseFlagUndefined: token "#1"
  57.             is undefined.}%
  58.     \fi
  59. }
  60. \newif\if@NameDefined
  61. \def\NameDefinedConditional #1{% 
  62.     TT\fi
  63.     \expandafter\ifx\csname #1\endcsname \relax
  64.         \@NameDefinedfalse
  65.     \else
  66.         \@NameDefinedtrue
  67.     \fi
  68.     \if@NameDefined
  69. }
  70. \catcode`\@ = 12
  71. % Here the output of inputd ends "namedef.tip".
  72.  
  73.  
  74. % Here begins "everypar.tip".
  75. % This macro source file is from the four volume series
  76. % "TeX in Practice" by Stephan von Bechtolsheim, published
  77. % 1993 by Springer-Verlag, New York.
  78. % Copyright 1993 Stephan von Bechtolsheim.
  79. % No warranty or liability is assumed.
  80. % This macro may be copied freely if no fees other than
  81. % media cost or shipping charges are charged and as long
  82. % as this copyright and the following source code itself
  83. % is not changed. Please see the series for further information.
  84. %
  85. % Version: 1.0
  86. % Date: May 1, 1993
  87. %
  88. %
  89. % This source code is documented in 10.9.3, p. II-34.
  90. % Original source in file "par1.TEX", starting line 1707.
  91. \wlog{L: "everypar.tip" ["par1.TEX," l. 1707, p. II-34]}%
  92. % This file DOES belong to format "texip."
  93. \everypar = {%
  94.     \EvalEveryPars
  95.     \ClearEveryPars
  96. }
  97. \def\EvalEveryParsCE{%
  98.     \EveryParC
  99.     \EveryParD
  100.     \EveryParE
  101. }
  102. \def\EvalEveryPars{%
  103.     \EveryParA
  104.     \EveryParB
  105.     \EvalEveryParsCE
  106.     \EveryParZ
  107. }
  108. \def\ClearEveryPars{%
  109.     \gdef\EveryParA{}%
  110.     \gdef\EveryParB{}%
  111.     \gdef\EveryParC{}%
  112.     \gdef\EveryParD{}%
  113.     \gdef\EveryParE{}%
  114. }
  115. \def\ClearEveryParsAll{%
  116.     \ClearEveryPars
  117.     \gdef\EveryParZ{}%
  118. }
  119. \ClearEveryParsAll
  120. % Here the output of inputd ends "everypar.tip".
  121.  
  122.  
  123. % Here begins "futlet.tip".
  124. % This macro source file is from the four volume series
  125. % "TeX in Practice" by Stephan von Bechtolsheim, published
  126. % 1993 by Springer-Verlag, New York.
  127. % Copyright 1993 Stephan von Bechtolsheim.
  128. % No warranty or liability is assumed.
  129. % This macro may be copied freely if no fees other than
  130. % media cost or shipping charges are charged and as long
  131. % as this copyright and the following source code itself
  132. % is not changed. Please see the series for further information.
  133. %
  134. % Version: 1.0
  135. % Date: May 1, 1993
  136. %
  137. %
  138. % This source code is documented in 23.4.3, p. III-256.
  139. % Original source in file "macros3.TEX", starting line 1021.
  140. \wlog{L: "futlet.tip" ["macros3.TEX," l. 1021, p. III-256]}%
  141. % This file DOES belong to format "texip."
  142. \catcode`\@ = 11
  143. \long\def\DoLongFutureLet #1#2#3#4{% 
  144.     \def\@FutureLetDecide{% 
  145.         #1#2\@FutureLetToken
  146.             \def\@FutureLetNext{#3}%
  147.         \else
  148.             \def\@FutureLetNext{#4}%
  149.         \fi
  150.         \@FutureLetNext
  151.     }% 
  152.     \futurelet\@FutureLetToken\@FutureLetDecide
  153. }
  154. \def\DoFutureLet #1#2#3#4{\DoLongFutureLet{#1}{#2}{#3}{#4}}
  155. \catcode`\@ = 12
  156. % Here the output of inputd ends "futlet.tip".
  157.  
  158.  
  159. % Here begins "funospac.tip".
  160. % This macro source file is from the four volume series
  161. % "TeX in Practice" by Stephan von Bechtolsheim, published
  162. % 1993 by Springer-Verlag, New York.
  163. % Copyright 1993 Stephan von Bechtolsheim.
  164. % No warranty or liability is assumed.
  165. % This macro may be copied freely if no fees other than
  166. % media cost or shipping charges are charged and as long
  167. % as this copyright and the following source code itself
  168. % is not changed. Please see the series for further information.
  169. %
  170. % Version: 1.0
  171. % Date: May 1, 1993
  172. %
  173. %
  174. % This source code is documented in 23.4.10.1, p. III-271.
  175. % Original source in file "macros3.TEX", starting line 1710.
  176. \wlog{L: "funospac.tip" ["macros3.TEX," l. 1710, p. III-271]}%
  177. % This file DOES belong to format "texip."
  178. \InputD{futlet.tip}
  179. \catcode`\@ = 11
  180. \def\FutureLetNoSpace #1#2{% 
  181.     \def\@FutureLetTokenA{#1}% 
  182.     \def\@FutureLetTokenB{#2}% 
  183.     \@FutureLetOne
  184. }
  185. \def\@FutureLetOne{% 
  186.     \DoFutureLet{\ifx}{ }%
  187.         {\@FutureLetThree}{\@FutureLetOk}%
  188. }
  189. \edef\@FutureLetNoSpaceTemp{% 
  190.     \def\noexpand\@FutureLetThree\space{\noexpand\@FutureLetOne}% 
  191. }
  192. \@FutureLetNoSpaceTemp
  193. \def\@FutureLetOk{% 
  194.     \expandafter\futurelet\@FutureLetTokenA\@FutureLetTokenB
  195. }
  196. \long\def\DoLongFutureLetNoSpace #1#2#3#4{%
  197.     \def\@FutureLetDecideNoSpace{%
  198.         #1#2\@FutureLetTokenNoSpace
  199.             \def\@FutureLetNextNoSpace{#3}%
  200.         \else
  201.             \def\@FutureLetNextNoSpace{#4}%
  202.         \fi
  203.         \@FutureLetNextNoSpace
  204.     }% 
  205.     \FutureLetNoSpace{\@FutureLetTokenNoSpace}%
  206.         {\@FutureLetDecideNoSpace}%
  207. }
  208. \def\DoFutureLetNoSpace #1#2#3#4{%
  209.     \DoLongFutureLetNoSpace{#1}{#2}{#3}{#4}%
  210. }
  211. \catcode`\@ = 12
  212. % Here the output of inputd ends "funospac.tip".
  213.  
  214.  
  215. % Here begins "futpar.tip".
  216. % This macro source file is from the four volume series
  217. % "TeX in Practice" by Stephan von Bechtolsheim, published
  218. % 1993 by Springer-Verlag, New York.
  219. % Copyright 1993 Stephan von Bechtolsheim.
  220. % No warranty or liability is assumed.
  221. % This macro may be copied freely if no fees other than
  222. % media cost or shipping charges are charged and as long
  223. % as this copyright and the following source code itself
  224. % is not changed. Please see the series for further information.
  225. %
  226. % Version: 1.0
  227. % Date: May 1, 1993
  228. %
  229. %
  230. % This source code is documented in 23.4.11, p. III-274.
  231. % Original source in file "macros3.TEX", starting line 1899.
  232. \wlog{L: "futpar.tip" ["macros3.TEX," l. 1899, p. III-274]}%
  233. % This file DOES belong to format "texip."
  234. \InputD{funospac.tip}
  235. \def\ParLookAhead #1#2{%
  236.     \DoLongFutureLetNoSpace{\ifx}{\par}%
  237.         {#1}{#2}%
  238. }
  239. % Here the output of inputd ends "futpar.tip".
  240.  
  241.  
  242. % Here begins "parin.tip".
  243. % This macro source file is from the four volume series
  244. % "TeX in Practice" by Stephan von Bechtolsheim, published
  245. % 1993 by Springer-Verlag, New York.
  246. % Copyright 1993 Stephan von Bechtolsheim.
  247. % No warranty or liability is assumed.
  248. % This macro may be copied freely if no fees other than
  249. % media cost or shipping charges are charged and as long
  250. % as this copyright and the following source code itself
  251. % is not changed. Please see the series for further information.
  252. %
  253. % Version: 1.0
  254. % Date: May 1, 1993
  255. %
  256. %
  257. % This source code is documented in 10.9.4, p. II-35.
  258. % Original source in file "par1.TEX", starting line 1808.
  259. \wlog{L: "parin.tip" ["par1.TEX," l. 1808, p. II-35]}%
  260. % This file DOES belong to format "texip."
  261. \InputD{everypar.tip}
  262. \newdimen\NormalParIndent
  263. \def\SetParIndent #1{%
  264.     \NormalParIndent = #1%
  265.     \parindent = #1%
  266. }
  267. \def\SuppressNextParIndent{%
  268.     \global\parindent = 0pt
  269.     \gdef\EveryParA{%
  270.         \global\parindent = \NormalParIndent
  271.         % \hskip-\parindent
  272.     }%
  273. }
  274. \def\CancelSuppressNextParIndent{%
  275.     \global\parindent = \NormalParIndent
  276.     \gdef\EveryParA{}%
  277. }
  278. % Here the output of inputd ends "parin.tip".
  279.  
  280.  
  281. % Here begins "verb-bas.tip".
  282. % This macro source file is from the four volume series
  283. % "TeX in Practice" by Stephan von Bechtolsheim, published
  284. % 1993 by Springer-Verlag, New York.
  285. % Copyright 1993 Stephan von Bechtolsheim.
  286. % No warranty or liability is assumed.
  287. % This macro may be copied freely if no fees other than
  288. % media cost or shipping charges are charged and as long
  289. % as this copyright and the following source code itself
  290. % is not changed. Please see the series for further information.
  291. %
  292. % Version: 1.0
  293. % Date: May 1, 1993
  294. %
  295. %
  296. % This source code is documented in 18.3.1, p. III-27.
  297. % Original source in file "tokens1.TEX", starting line 1625.
  298. \wlog{L: "verb-bas.tip" ["tokens1.TEX," l. 1625, p. III-27]}%
  299. % This file DOES belong to format "texip."
  300. \catcode`\@ = 11
  301. \def\MakeOther #1{\catcode `#1 = 12 }
  302. \def\MakeActive #1{\catcode `#1 = \active\relax}
  303. \def\MakeEolActive{\MakeActive{\^^M}}
  304. \def\MakeTabActive{\MakeActive{\^^I}}
  305. \def\MkOthersNoCB{%
  306.     \MakeOther{\ }%
  307.     \MakeOther{\\}%
  308.     \MakeOther{\$}%
  309.     \MakeOther{\&}%
  310.     \MakeOther{\#}%
  311.     \MakeOther{\^}\MakeOther{\^^K}%
  312.     \MakeOther{\_}\MakeOther{\^^A}%
  313.     \MakeOther{\%}%
  314.     \MakeOther{\~}%
  315. }
  316. \def\MkOthers{%
  317.     \MakeOther{\{}%
  318.     \MakeOther{\}}%
  319.     \MkOthersNoCB
  320. }
  321. {\catcode`\^^I = 11
  322. \gdef\@TabAsLiteral{^^I}% 
  323. }
  324. \catcode`\[ = 1
  325. \catcode`\] = 2
  326. [
  327.     \catcode`\{ = 12
  328.     \catcode`\} = 12
  329.     \gdef\LeftBraceText[{]
  330.     \gdef\RightBraceText[}]
  331. ]
  332. \catcode`\[ = 12
  333. \catcode`\] = 12
  334. \def\AcuteAccentText{\'{}}
  335. \def\AcuteAccentTt{{\tt\AcuteAccentText}}
  336. \def\AmpersandText{\char`\&}
  337. \def\AmpersandTt{{\tt\AmpersandText}}
  338. \def\ApostropheText{'{}}
  339. \def\ApostropheTt{{\tt\ApostropheText}}
  340. \def\AtSignText{@}
  341. \def\AtSignTt{{\tt\AtSignText}}
  342. {% 
  343.     \catcode`| = 0
  344.     |catcode`\\ = 12
  345.     |gdef|Backslash{\}
  346. }
  347. \def\BackslashTt{{\tt\char`\\}}
  348. \def\CaretText{\char`\^{}}
  349. \def\CaretTt{{\tt\CaretText}}
  350. \def\DollarSignText{\$}
  351. \def\DollarSignTt{{\tt\DollarSignText}}
  352. {
  353.     \catcode`\# = 12
  354.     \gdef\PoundSign{#}
  355. }
  356. \def\pounds{{\it\char'44 }}
  357. \def\DoubleQuoteTt{{\tt"}}
  358. \def\EmDashText{{}---{}}
  359. \def\EmDashTt{{\tt\EmDashText}}
  360. \def\EnDashText{{}--{}}
  361. \def\EnDashTt{{\tt\EnDashText}}
  362. \def\ExclamationPointText{!}
  363. \def\ExclamationPointTt{{\tt\ExclamationPointText}}
  364. \def\GreaterThanSign{>}
  365. \def\GreaterThanSignTt{{\tt\GreaterThanSign}}
  366. \def\HyphenText{-}
  367. \def\HyphenTt{{\tt\HyphenText}}
  368. \def\OpenExclamationText{>}
  369. \def\OpenExclamationTt{{\tt\OpenExclamationText}}
  370. \def\LeftBraceTt{{\tt\LeftBraceText}}
  371. \def\LeftBracketText{[}
  372. \def\LeftBracketTt{{\tt\LeftBracketText}}
  373. \def\LeftParenthesisText{(}
  374. \def\LeftParenthesisTt{{\tt\LeftParenthesisText}}
  375. \def\LeftQuoteText{`{}}
  376. \def\LeftQuoteTt{{\tt\LeftQuoteText}}
  377. \def\LessThanSign{<}
  378. \def\LessThanSignTt{{\tt\LessThanSign}}
  379. \def\MinusSignText{-}
  380. \def\MinusSignTt{{\tt\MinusSignText}}
  381. \def\OpenQuestionText{<}
  382. \def\OpenQuestionTt{{\tt\OpenQuestionText}}
  383. \def\PlusSignText{+}
  384. \def\PlusSignTt{{\tt\PlusSignText}}
  385. \def\PercentSignText{\%}
  386. \def\PercentSignTt{{\tt\PercentSignText}}
  387. {
  388.     \catcode`\% = 12
  389.     \gdef\PercentSignPure{%}
  390. }
  391. \def\PeriodText{.}
  392. \def\PeriodTt{{\tt\PeriodText}}
  393. \def\PoundSignText{\#}
  394. \def\PoundSignTt{{\tt\PoundSignText}}
  395. \def\QuestionMarkText{?}
  396. \def\QuestionMarkTt{{\tt\QuestionMarkText}}
  397. \def\RightBraceTt{{\tt\RightBraceText}}
  398. \def\RightBracketText{]}
  399. \def\RightBracketTt{{\tt\RightBracketText}}
  400. \def\RightQuoteText{'{}}
  401. \def\RightQuoteTt{{\tt\RightQuoteText}}
  402. \def\RightParenthesisText{)}
  403. \def\RightParenthesisTt{{\tt\RightParenthesisText}}
  404. \def\SpaceText{ }
  405. \def\VisibleSpaceTt{{\tt\char"20}}
  406. \def\TildeText{\char`\~{}}
  407. \def\TildeTt{{\tt\TildeText}}
  408. \def\UnderscoreText{\char`\_}
  409. \def\UnderscoreTt{{\tt\UnderscoreText}}
  410. \def\VerbControlSpace{\ }
  411. \catcode`\@ = 12
  412. % Here the output of inputd ends "verb-bas.tip".
  413.  
  414.  
  415. % Here begins "testdef.tip".
  416. % This macro source file is from the four volume series
  417. % "TeX in Practice" by Stephan von Bechtolsheim, published
  418. % 1993 by Springer-Verlag, New York.
  419. % Copyright 1993 Stephan von Bechtolsheim.
  420. % No warranty or liability is assumed.
  421. % This macro may be copied freely if no fees other than
  422. % media cost or shipping charges are charged and as long
  423. % as this copyright and the following source code itself
  424. % is not changed. Please see the series for further information.
  425. %
  426. % Version: 1.0
  427. % Date: May 1, 1993
  428. %
  429. %
  430. % This source code is documented in 21.5.6, p. III-173.
  431. % Original source in file "macros1.TEX", starting line 1179.
  432. \wlog{L: "testdef.tip" ["macros1.TEX," l. 1179, p. III-173]}%
  433. % This file DOES belong to format "texip."
  434. \catcode`\@ = 11
  435. \newif\if@Defined
  436. \def\DefinedConditional #1{%
  437.     TT\fi
  438.     \ifx\@UndefinedToken #1% 
  439.         \@Definedfalse
  440.     \else
  441.         \@Definedtrue
  442.     \fi
  443.     \if@Defined
  444. }
  445. \catcode`\@ = 12
  446. % Here the output of inputd ends "testdef.tip".
  447.  
  448.  
  449. % Here begins "gobble.tip".
  450. % This macro source file is from the four volume series
  451. % "TeX in Practice" by Stephan von Bechtolsheim, published
  452. % 1993 by Springer-Verlag, New York.
  453. % Copyright 1993 Stephan von Bechtolsheim.
  454. % No warranty or liability is assumed.
  455. % This macro may be copied freely if no fees other than
  456. % media cost or shipping charges are charged and as long
  457. % as this copyright and the following source code itself
  458. % is not changed. Please see the series for further information.
  459. %
  460. % Version: 1.0
  461. % Date: May 1, 1993
  462. %
  463. %
  464. % This source code is documented in 21.8.6, p. III-186.
  465. % Original source in file "macros1.TEX", starting line 1836.
  466. \wlog{L: "gobble.tip" ["macros1.TEX," l. 1836, p. III-186]}%
  467. % This file DOES belong to format "texip."
  468. \def\GobbleOne  #1{}
  469. \def\GobbleTwo  #1#2{}
  470. \def\GobbleThree#1#2#3{}
  471. \def\GobbleFour #1#2#3#4{}
  472. \def\GobbleFive #1#2#3#4#5{}
  473. \def\GobbleSix  #1#2#3#4#5#6{}
  474. \def\GobbleSeven#1#2#3#4#5#6#7{}
  475. \def\GobbleEight#1#2#3#4#5#6#7#8{}
  476. \def\GobbleNine #1#2#3#4#5#6#7#8#9{}
  477. % Here the output of inputd ends "gobble.tip".
  478.  
  479.  
  480. % Here begins "loadedla.tip".
  481. % This macro source file is from the four volume series
  482. % "TeX in Practice" by Stephan von Bechtolsheim, published
  483. % 1993 by Springer-Verlag, New York.
  484. % Copyright 1993 Stephan von Bechtolsheim.
  485. % No warranty or liability is assumed.
  486. % This macro may be copied freely if no fees other than
  487. % media cost or shipping charges are charged and as long
  488. % as this copyright and the following source code itself
  489. % is not changed. Please see the series for further information.
  490. %
  491. % Version: 1.0
  492. % Date: May 1, 1993
  493. %
  494. %
  495. % This source code is documented in 21.5.6, p. III-174.
  496. % Original source in file "macros1.TEX", starting line 1267.
  497. \wlog{L: "loadedla.tip" ["macros1.TEX," l. 1267, p. III-174]}%
  498. % This file DOES belong to format "texip."
  499. \InputD{testdef.tip}
  500. \def\FormatIsLaTeXConditional{%
  501.     TT\fi
  502.     \if\DefinedConditional{\documentstyle}%
  503. }
  504. % Here the output of inputd ends "loadedla.tip".
  505.  
  506.  
  507. % Here begins "verbdisp.tip".
  508. % This macro source file is from the four volume series
  509. % "TeX in Practice" by Stephan von Bechtolsheim, published
  510. % 1993 by Springer-Verlag, New York.
  511. % Copyright 1993 Stephan von Bechtolsheim.
  512. % No warranty or liability is assumed.
  513. % This macro may be copied freely if no fees other than
  514. % media cost or shipping charges are charged and as long
  515. % as this copyright and the following source code itself
  516. % is not changed. Please see the series for further information.
  517. %
  518. % Version: 1.0
  519. % Date: May 1, 1993
  520. %
  521. %
  522. % This source code is documented in 18.3.13, p. III-45.
  523. % Original source in file "tokens1.TEX", starting line 2639.
  524. \wlog{L: "verbdisp.tip" ["tokens1.TEX," l. 2639, p. III-45]}%
  525. % This file DOES belong to format "texip."
  526. \InputD{everypar.tip}
  527. \InputD{futpar.tip}
  528. \InputD{parin.tip}
  529. \InputD{verb-bas.tip}
  530. \InputD{testdef.tip}
  531. \InputD{gobble.tip}
  532. \InputD{loadedla.tip}
  533. \newdimen\LeftSkipVerbatim
  534. \LeftSkipVerbatim = 0.3in
  535. \def\VerbatimFont{\tt}
  536. \newcount\VerbatimTab
  537. \VerbatimTab = 8
  538. \newif\ifVerbLineNum
  539. \VerbLineNumtrue
  540. \newskip\DisplayVerbatimVskip
  541. \DisplayVerbatimVskip = 0pt plus 2pt minus 1pt
  542. \newif\ifCaretTab
  543. \CaretTabfalse
  544. \newtoks\VerbatimTokBegin   \VerbatimTokBegin = {}
  545. \newtoks\VerbatimTokLine    \VerbatimTokLine = {}
  546. \newtoks\VerbatimTokEnd     \VerbatimTokEnd = {}
  547. \catcode`\@ = 11
  548. \newdimen\@VerbatimLr
  549. \@VerbatimLr = 1.5pt
  550. \newif\if@IgnoreFirstNewLine
  551. \if\FormatIsLaTeXConditional
  552.     \def\@VerbatimPar{\par\@@par}% 
  553.     \def\@VerbatimNlf{\tiny}% 
  554. \else
  555.     \def\@VerbatimPar{\par}% 
  556.     \def\@VerbatimNlf{\tiny}% 
  557. \fi
  558. \newcount\@VerbatimLineNumber
  559. \newif\if@VerbatimL
  560. \newdimen\Verb@TabSize
  561. \def\@VObeySpaces{% 
  562.     \MakeActive{\ }% 
  563.     \@@VObeySpaces
  564. }
  565. {%
  566. \MakeActive{\ }%
  567. \gdef\@@VObeySpaces{%
  568. \def {\VerbControlSpace}% 
  569. }%
  570. }
  571. \def\@VObeyTabs{% 
  572.     \MakeTabActive
  573.     \@@VObeyTabs
  574. }
  575. {
  576.     \MakeTabActive
  577.     \gdef\@@VObeyTabs{% 
  578.         \def^^I{\Verb@Tab}%
  579.     }
  580. }
  581. \def\Verb@Tab{% 
  582.     \leavevmode
  583.     \egroup
  584.     \dimen0 = \wd0
  585.     \divide\dimen0 by \Verb@TabSize
  586.     \advance\dimen0 by 1sp
  587.     \multiply\dimen0 by \Verb@TabSize
  588.     \wd0 = \dimen0
  589.     \box0
  590.     \setbox 0 = \hbox\bgroup
  591. }
  592. \def\@VObeyEol{% 
  593.     \MakeEolActive % 
  594.     \@@VObeyEol
  595. }
  596. {
  597.     \MakeEolActive % 
  598.     \gdef\@@VObeyEol{% 
  599.         \let^^M = \Verb@Eol% 
  600.     }% 
  601. }
  602. \def\Verb@Eol{%
  603.     \if@IgnoreFirstNewLine
  604.     \else
  605.         \leavevmode
  606.         \egroup
  607.         \box 0
  608.         \endgraf
  609.     \fi
  610.     \@IgnoreFirstNewLinefalse
  611. }
  612. \def\@VCaret{% 
  613.     \MakeActive{\^}% 
  614.     \@@VCaret
  615. }
  616. {
  617.     \MakeActive{\^}% 
  618.     \gdef\@@VCaret{% 
  619.         \def^{% 
  620.             \futurelet\@VSymbol\@@VCaretTwo
  621.         }% 
  622.         \def\@@VCaretTwo{%
  623.             \ifx \@VSymbol^%
  624.                 \let\@VerbNext = \@@VCaretThree
  625.             \else
  626.                 \CaretText
  627.                 \let\@VerbNext = \relax
  628.             \fi
  629.             \@VerbNext
  630.         }% 
  631.         \def\@@VCaretThree ^{%
  632.             \futurelet\@VSymbol\@@VCaretFour
  633.         }%
  634.         \def\@@VCaretFour{% 
  635.             \ifx \@VSymbol I%
  636.                 \Verb@Tab
  637.             \else
  638.                 \CaretText\CaretText\@VSymbol
  639.             \fi
  640.             \GobbleOne
  641.         }% 
  642.     }% 
  643. }
  644. \def\@StartVerbatim #1{% 
  645.     \begingroup
  646.     \@VerbatimPar
  647.     \vskip\DisplayVerbatimVskip
  648.     \if\FormatIsLaTeXConditional
  649.     \else
  650.         \CancelSuppressNextParIndent
  651.     \fi
  652.     \setbox0 = \hbox{\VerbatimFont X}
  653.     \Verb@TabSize = \wd0
  654.     \multiply\Verb@TabSize by \VerbatimTab
  655.     \parskip = 0pt
  656.     \parindent = 0pt
  657.     \leftskip = \LeftSkipVerbatim
  658.     \rightskip = 0pt
  659.     \parfillskip = 0pt plus 1fil
  660.     \spaceskip = 0pt
  661.     \xspaceskip = 0pt
  662.     \VerbatimFont
  663.     \if@VerbatimL
  664.     \else
  665.         \global\@VerbatimLineNumber = 0
  666.     \fi
  667.     \global\@VerbatimLfalse
  668.     \ifnum #1 = 0
  669.         \@IgnoreFirstNewLinetrue
  670.     \else
  671.         \@IgnoreFirstNewLinefalse
  672.     \fi
  673.     \if\FormatIsLaTeXConditional
  674.         \everypar = {\EveryParZ}%
  675.     \fi
  676.     \def\EveryParZ{% 
  677.         \the\VerbatimTokLine
  678.         \global\advance\@VerbatimLineNumber by 1
  679.         \ifVerbLineNum
  680.             \raise \@VerbatimLr \hbox to 0pt{% 
  681.                 \hss
  682.                 \@VerbatimNlf
  683.                 \the\@VerbatimLineNumber
  684.                 \hskip 10pt
  685.             }% 
  686.         \fi
  687.         \setbox 0 = \hbox\bgroup
  688.     }%
  689.     \MkOthers
  690.     \@VObeySpaces
  691.     \@VObeyTabs
  692.     \@VObeyEol
  693.     \ifCaretTab
  694.         \@VCaret
  695.     \fi
  696. }
  697. \def\@DoneVerbatim{%
  698.     \endgroup
  699.     \vskip\DisplayVerbatimVskip
  700.     \def\@VerbatimEndSpecialDeal{}%
  701.     \if\FormatIsLaTeXConditional
  702.     \else
  703.         \def\@VerbatimEndSpecialDeal{%
  704.             \ParLookAhead
  705.                 {\SuppressNextParIndent}%
  706.                 {}
  707.         }%
  708.     \fi
  709.     \@VerbatimEndSpecialDeal
  710. }
  711. \def\BeginVerbatim{% 
  712.     \@StartVerbatim{0}% 
  713.     \@BeginVerbatim
  714. }
  715. {   \catcode `| = 0 % | becomes escape character.
  716.     \catcode`\\ =12 % \ becomes regular character.
  717.     |gdef|@BeginVerbatim #1\EndVerbatim{% 
  718.         #1% 
  719.         |@DoneVerbatim
  720.     }
  721. }
  722. \def\BVerB{% 
  723.     \@StartVerbatim{0}% 
  724.     \@BVerB
  725. }
  726. {
  727.     \catcode `| = 0 % | becomes escape character.
  728.     \catcode`\\ =12 % \ becomes regular character.
  729.     |gdef|@BVerB #1\EVerB{% 
  730.         #1% 
  731.         |@DoneVerbatim
  732.     }
  733. }
  734. \def\AppendVerbatimL #1{% 
  735.     \global\@VerbatimLtrue
  736.     \global\advance\@VerbatimLineNumber by #1\relax
  737. }
  738. \def\StartVerbatimL #1{% 
  739.     \global\@VerbatimLtrue
  740.     \global\@VerbatimLineNumber = #1\relax
  741. }
  742. \newcount\@SaveVerbatimLineNumber
  743. \def\PushVerbatimL{%
  744.     \global\@SaveVerbatimLineNumber = \@VerbatimLineNumber  
  745.     \global\VerbLineNumfalse
  746. }
  747. \def\PopVerbatimL{%
  748.     \global\@VerbatimLineNumber = \@SaveVerbatimLineNumber
  749.     \global\VerbLineNumtrue
  750. }
  751. \catcode`\@ = 12
  752. % Here the output of inputd ends "verbdisp.tip".
  753.  
  754.  
  755. % Here begins "lfondem.tip".
  756. % This macro source file is from the four volume series
  757. % "TeX in Practice" by Stephan von Bechtolsheim, published
  758. % 1993 by Springer-Verlag, New York.
  759. % Copyright 1993 Stephan von Bechtolsheim.
  760. % No warranty or liability is assumed.
  761. % This macro may be copied freely if no fees other than
  762. % media cost or shipping charges are charged and as long
  763. % as this copyright and the following source code itself
  764. % is not changed. Please see the series for further information.
  765. %
  766. % Version: 1.0
  767. % Date: May 1, 1993
  768. %
  769. %
  770. % This source code is documented in 16.1.2.2, p. II-265.
  771. % Original source in file "fonts2.TEX", starting line 121.
  772. \wlog{L: "lfondem.tip" ["fonts2.TEX," l. 121, p. II-265]}%
  773. % This file DOES belong to format "texip."
  774. \def\LoadFontOnDemand #1#2{%
  775.     \def #1{% 
  776.         \global\font#1 = #2\relax
  777.         #1%
  778.         \message{\string\LoadFontOnDemand: font \string#1
  779.             (#2) loaded on demand.}% 
  780.     }%
  781. }
  782. % Here the output of inputd ends "lfondem.tip".
  783.  
  784.  
  785. % Here begins "substf.tip".
  786. % This macro source file is from the four volume series
  787. % "TeX in Practice" by Stephan von Bechtolsheim, published
  788. % 1993 by Springer-Verlag, New York.
  789. % Copyright 1993 Stephan von Bechtolsheim.
  790. % No warranty or liability is assumed.
  791. % This macro may be copied freely if no fees other than
  792. % media cost or shipping charges are charged and as long
  793. % as this copyright and the following source code itself
  794. % is not changed. Please see the series for further information.
  795. %
  796. % Version: 1.0
  797. % Date: May 1, 1993
  798. %
  799. %
  800. % This source code is documented in 16.1.3, p. II-265.
  801. % Original source in file "fonts2.TEX", starting line 159.
  802. \wlog{L: "substf.tip" ["fonts2.TEX," l. 159, p. II-265]}%
  803. % This file DOES belong to format "texip."
  804. \def\SubstituteFontX #1#2#3#4{% 
  805.     \def#1{% 
  806.         \message{%
  807.             \string\SubstituteFontX: No \string#2 font of
  808.             #3pt, using \noexpand\rm instead.%
  809.         }%
  810.         \global\let #1 = #4% 
  811.         #1% 
  812.     }%
  813. }
  814. % Here the output of inputd ends "substf.tip".
  815.  
  816.  
  817. % Here begins "newoutfr.tip".
  818. % This macro source file is from the four volume series
  819. % "TeX in Practice" by Stephan von Bechtolsheim, published
  820. % 1993 by Springer-Verlag, New York.
  821. % Copyright 1993 Stephan von Bechtolsheim.
  822. % No warranty or liability is assumed.
  823. % This macro may be copied freely if no fees other than
  824. % media cost or shipping charges are charged and as long
  825. % as this copyright and the following source code itself
  826. % is not changed. Please see the series for further information.
  827. %
  828. % Version: 1.0
  829. % Date: May 1, 1993
  830. %
  831. %
  832. % This source code is documented in 4.6.2, p. I-113.
  833. % Original source in file "reg2.TEX", starting line 1610.
  834. \wlog{L: "newoutfr.tip" ["reg2.TEX," l. 1610, p. I-113]}%
  835. % This file DOES belong to format "texip."
  836. \catcode`\@ = 11
  837. \def\newcountOF{\alloc@0\count\countdef\insc@unt}
  838. \def\newdimenOF{\alloc@1\dimen\dimendef\insc@unt}
  839. \def\newskipOF{\alloc@2\skip\skipdef\insc@unt}
  840. \def\newmuskipOF{\alloc@3\muskip\muskipdef\@cclvi}
  841. \def\newboxOF{\alloc@4\box\chardef\insc@unt}
  842. \def\newhelpOF#1#2{\newtoksOF#1#1\expandafter{\csname#2\endcsname}}
  843. \def\newtoksOF{\alloc@5\toks\toksdef\@cclvi}
  844. \def\newreadOF{\alloc@6\read\chardef\sixt@@n}
  845. \def\newwriteOF{\alloc@7\write\chardef\sixt@@n}
  846. \def\newfamOF{\alloc@8\fam\chardef\sixt@@n}
  847. \def\newifOF#1{\count@\escapechar \escapechar\m@ne
  848.   \expandafter\expandafter\expandafter
  849.    \edef\@if#1{true}{\let\noexpand#1=\noexpand\iftrue}%
  850.   \expandafter\expandafter\expandafter
  851.    \edef\@if#1{false}{\let\noexpand#1=\noexpand\iffalse}%
  852.   \@if#1{false}\escapechar\count@} % the condition starts out false
  853. \def\newlanguageOF{\alloc@9\language\chardef\@cclvi}
  854. \catcode`\@ = 12
  855. % Here the output of inputd ends "newoutfr.tip".
  856.  
  857.  
  858. % Here begins "ts-subst.tip".
  859. % This macro source file is from the four volume series
  860. % "TeX in Practice" by Stephan von Bechtolsheim, published
  861. % 1993 by Springer-Verlag, New York.
  862. % Copyright 1993 Stephan von Bechtolsheim.
  863. % No warranty or liability is assumed.
  864. % This macro may be copied freely if no fees other than
  865. % media cost or shipping charges are charged and as long
  866. % as this copyright and the following source code itself
  867. % is not changed. Please see the series for further information.
  868. %
  869. % Version: 1.0
  870. % Date: May 1, 1993
  871. %
  872. %
  873. % This source code is documented in 16.1.4, p. II-267.
  874. % Original source in file "fonts2.TEX", starting line 227.
  875. \wlog{L: "ts-subst.tip" ["fonts2.TEX," l. 227, p. II-267]}%
  876. % This file DOES belong to format "texip."
  877. \InputD{substf.tip}
  878. \InputD{newoutfr.tip}
  879. \def\SubstituteFont #1#2#3#4{% 
  880.     \expandafter\newifOF \csname if-\string#1\endcsname
  881.     \csname if-\string#1true\endcsname
  882.     \def#1{% 
  883.         \csname if-\string#1\endcsname
  884.             \message{%
  885.                 \string\SubstituteFont: No \string#2 font at
  886.                 size #3pt, using \noexpand\rm instead.%
  887.             }%
  888.             \global\csname if-\string#1false\endcsname
  889.         \fi
  890.         #4% 
  891.     }%
  892. }
  893. % Here the output of inputd ends "ts-subst.tip".
  894.  
  895.  
  896. % Here begins "fsized.tip".
  897. % This macro source file is from the four volume series
  898. % "TeX in Practice" by Stephan von Bechtolsheim, published
  899. % 1993 by Springer-Verlag, New York.
  900. % Copyright 1993 Stephan von Bechtolsheim.
  901. % No warranty or liability is assumed.
  902. % This macro may be copied freely if no fees other than
  903. % media cost or shipping charges are charged and as long
  904. % as this copyright and the following source code itself
  905. % is not changed. Please see the series for further information.
  906. %
  907. % Version: 1.0
  908. % Date: May 1, 1993
  909. %
  910. %
  911. % This source code is documented in 16.1.7, p. II-270.
  912. % Original source in file "fonts2.TEX", starting line 373.
  913. \wlog{L: "fsized.tip" ["fonts2.TEX," l. 373, p. II-270]}%
  914. % This file DOES belong to format "texip."
  915. \newdimen\CurrentFontSize
  916. \InputD{namedef.tip}
  917. \def\DefineFontSizeGroup #1#2{% 
  918.     \wlog{\string\DefineFontSizeGroup: defining group "#1" (#2 pt)}%
  919.     \NameDef{FontSize#1}{% 
  920.         \def\rm{\fam = 0        \NameUse{#1rm}}%
  921.         \def\bf{\fam = \bffam   \NameUse{#1bf}}%
  922.         \def\it{\fam = \itfam   \NameUse{#1it}}%
  923.         \def\tt{\fam = \ttfam   \NameUse{#1tt}}%
  924.         \def\sc{\NameUse{#1sc}}%
  925.         \def\sl{\fam = \slfam   \NameUse{#1sl}}%
  926.         \CurrentFontSize = #2pt
  927.         \baselineskip = \LineSpaceMultFactor\CurrentFontSize
  928.         \rm
  929.     }
  930. }
  931. \def\LineSpaceMultFactor{1.2}
  932. % Here the output of inputd ends "fsized.tip".
  933.  
  934.  
  935. % Here begins "newfont.tip".
  936. % This macro source file is from the four volume series
  937. % "TeX in Practice" by Stephan von Bechtolsheim, published
  938. % 1993 by Springer-Verlag, New York.
  939. % Copyright 1993 Stephan von Bechtolsheim.
  940. % No warranty or liability is assumed.
  941. % This macro may be copied freely if no fees other than
  942. % media cost or shipping charges are charged and as long
  943. % as this copyright and the following source code itself
  944. % is not changed. Please see the series for further information.
  945. %
  946. % Version: 1.0
  947. % Date: May 1, 1993
  948. %
  949. %
  950. % This source code is documented in 16.1.1, p. II-263.
  951. % Original source in file "fonts2.TEX", starting line 53.
  952. \wlog{L: "newfont.tip" ["fonts2.TEX," l. 53, p. II-263]}%
  953. % This file DOES belong to format "texip."
  954. \InputD{testdef.tip}
  955. \def\NewFont #1{% 
  956.     \if\DefinedConditional{#1}% 
  957.         \errmessage{\string\NewFont: intended font name
  958.             "\string#1" already used.}
  959.     \fi
  960.     \font #1% 
  961. }
  962. % Here the output of inputd ends "newfont.tip".
  963.  
  964.  
  965. % Here begins "ts-fonts.tip".
  966. % This macro source file is from the four volume series
  967. % "TeX in Practice" by Stephan von Bechtolsheim, published
  968. % 1993 by Springer-Verlag, New York.
  969. % Copyright 1993 Stephan von Bechtolsheim.
  970. % No warranty or liability is assumed.
  971. % This macro may be copied freely if no fees other than
  972. % media cost or shipping charges are charged and as long
  973. % as this copyright and the following source code itself
  974. % is not changed. Please see the series for further information.
  975. %
  976. % Version: 1.0
  977. % Date: May 1, 1993
  978. %
  979. %
  980. % This source code is documented in 16.1.9, p. II-271.
  981. % Original source in file "fonts2.TEX", starting line 447.
  982. \wlog{L: "ts-fonts.tip" ["fonts2.TEX," l. 447, p. II-271]}%
  983. % This file DOES belong to format "texip."
  984. \InputD{lfondem.tip}
  985. \InputD{ts-subst.tip}
  986. \InputD{fsized.tip}
  987. \InputD{newfont.tip}
  988. \InputD{testdef.tip}
  989. \font\RmLargerThanLife = cmr17 scaled \magstep5
  990. % \newfam\itfam      % \it is family 4
  991. % \newfam\slfam      % \sl is family 5
  992. % \newfam\bffam      % \bf is family 6
  993. % \newfam\ttfam      % \tt is family 7
  994. \NewFont\Vrm = cmr5
  995. \NewFont\Vit = cmti7 at 5pt
  996. \NewFont\Vbf = cmbx5
  997. \NewFont\Vsc = cmcsc10 at 5pt
  998. \SubstituteFont{\Vtt}{\tt}{7}{\VIIrm}
  999. \SubstituteFont{\Vsc}{\sc}{7}{\VIIrm}
  1000. \SubstituteFont{\Vsl}{\sl}{7}{\VIIrm}
  1001. \NewFont\VIIrm = cmr7
  1002. \NewFont\VIIit = cmti7
  1003. \NewFont\VIIbf = cmbx7
  1004. \NewFont\VIIsc = cmcsc10 at 7pt
  1005. \SubstituteFont{\VIItt}{\tt}{7}{\VIIrm}
  1006. \SubstituteFont{\VIIsl}{\sl}{7}{\VIIrm}
  1007. \NewFont\VIIIrm = cmr8
  1008. \NewFont\VIIIit = cmti8
  1009. \NewFont\VIIIbf = cmbx8
  1010. \NewFont\VIIItt = cmtt8
  1011. \NewFont\VIIIsc = cmcsc10 at 8pt
  1012. \SubstituteFont{\VIIIsl}{\sl}{8}{\VIIIrm}
  1013. \NewFont\IXrm = cmr9
  1014. \NewFont\IXit = cmti9
  1015. \NewFont\IXbf = cmbx9
  1016. \NewFont\IXtt = cmtt9
  1017. \NewFont\IXsc = cmcsc10 at 9pt
  1018. \SubstituteFont{\IXsl}{\sl}{9}{\IXrm}
  1019. \NewFont\Xrm = cmr10
  1020. \NewFont\Xit = cmti10
  1021. \NewFont\Xbf = cmbx10
  1022. \NewFont\Xtt = cmtt10
  1023. \NewFont\Xsc = cmcsc10
  1024. \NewFont\Xsl = cmcsc10
  1025. \NewFont\XIIrm = cmr12
  1026. \NewFont\XIIit = cmti12
  1027. \NewFont\XIIbf = cmbx12
  1028. \NewFont\XIItt = cmtt12
  1029. \NewFont\XIIsc = cmcsc10 scaled \magstep 1
  1030. \NewFont\XIIsl = cmcsc10 scaled \magstep 1
  1031. \NewFont\XIIIrm = cmr12 scaled \magstephalf
  1032. \NewFont\XIIIit = cmti12 scaled \magstephalf
  1033. \NewFont\XIIIbf = cmbx12 scaled \magstephalf
  1034. \NewFont\XIIItt = cmtt12 scaled \magstephalf
  1035. \NewFont\XIIIsc = cmcsc10 scaled \magstephalf
  1036. \NewFont\XIIIsl = cmcsc10 scaled \magstephalf
  1037. \NewFont\XVIIrm = cmr12 scaled \magstep 2
  1038. \NewFont\XVIIit = cmti12 scaled \magstep 2
  1039. \NewFont\XVIIbf = cmbx12 scaled \magstep 2
  1040. \NewFont\XVIItt = cmtt12 scaled \magstep 2
  1041. \NewFont\XVIIsc = cmcsc10 scaled \magstep 3
  1042. \NewFont\XVIIsl = cmcsc10 scaled \magstep 3
  1043. \NewFont\XXIrm = cmr17 scaled \magstep 1
  1044. \NewFont\XXIit = cmti12 scaled \magstep 3
  1045. \NewFont\XXIbf = cmbx12 scaled \magstep 3
  1046. \NewFont\XXIsc = cmcsc10 scaled \magstep 4
  1047. \LoadFontOnDemand{\XXItt}{cmtt12 scaled \magstep 3}
  1048. \SubstituteFont{\XXIsl}{\sl}{20.74}{\XXIrm}
  1049. \NewFont\XXVrm = cmr17 scaled \magstep 2
  1050. \NewFont\XXVit = cmti12 scaled \magstep 4
  1051. \NewFont\XXVbf = cmbx12 scaled \magstep 4
  1052. \NewFont\XXVsc = cmcsc10 at 5pt
  1053. \LoadFontOnDemand{\XXVtt}{cmtt12 scaled \magstep 4}
  1054. \SubstituteFont{\XXVsl}{\sl}{20.74}{\XXVrm}
  1055. \DefineFontSizeGroup{V}{5}
  1056. \DefineFontSizeGroup{VII}{7}
  1057. \DefineFontSizeGroup{VIII}{8}
  1058. \DefineFontSizeGroup{IX}{9}
  1059. \DefineFontSizeGroup{X}{10}
  1060. \DefineFontSizeGroup{XII}{12}
  1061. \DefineFontSizeGroup{XIII}{13.14}
  1062. \DefineFontSizeGroup{XVII}{17.28}
  1063. \DefineFontSizeGroup{XXI}{20.74}
  1064. \DefineFontSizeGroup{XXV}{24.88}
  1065. \let\tiny = \FontSizeV
  1066. \let\scriptsize = \FontSizeVII
  1067. \let\footnotesize = \FontSizeVIII
  1068. \let\small = \FontSizeIX
  1069. \let\normalsize = \FontSizeX
  1070. \let\large = \FontSizeXII
  1071. \let\Large = \FontSizeXIII
  1072. \let\LARGE = \FontSizeXVII
  1073. \let\huge  = \FontSizeXXI
  1074. \let\Huge  = \FontSizeXXV
  1075. \def\LineSpaceMultFactor{1.2}
  1076. \normalsize
  1077. % Here the output of inputd ends "ts-fonts.tip".
  1078.  
  1079.  
  1080. % Here begins "fexist.tip".
  1081. % This macro source file is from the four volume series
  1082. % "TeX in Practice" by Stephan von Bechtolsheim, published
  1083. % 1993 by Springer-Verlag, New York.
  1084. % Copyright 1993 Stephan von Bechtolsheim.
  1085. % No warranty or liability is assumed.
  1086. % This macro may be copied freely if no fees other than
  1087. % media cost or shipping charges are charged and as long
  1088. % as this copyright and the following source code itself
  1089. % is not changed. Please see the series for further information.
  1090. %
  1091. % Version: 1.0
  1092. % Date: May 1, 1993
  1093. %
  1094. %
  1095. % This source code is documented in 28.4.1, p. III-465.
  1096. % Original source in file "io1.TEX", starting line 910.
  1097. \wlog{L: "fexist.tip" ["io1.TEX," l. 910, p. III-465]}%
  1098. % This file DOES belong to format "texip."
  1099. \catcode`\@ = 11
  1100. \newread\@FileExistsS
  1101. \newif\if@FileExistsAnswer
  1102. \def\FileExistsConditional #1{% 
  1103.     TT\fi
  1104.     \openin\@FileExistsS = #1
  1105.     \ifeof\@FileExistsS
  1106.         \@FileExistsAnswerfalse
  1107.     \else
  1108.         \closein\@FileExistsS
  1109.         \@FileExistsAnswertrue
  1110.     \fi
  1111.     \if@FileExistsAnswer
  1112. }
  1113. \catcode`\@ = 12
  1114. % Here the output of inputd ends "fexist.tip".
  1115.  
  1116.  
  1117. % Here begins "verb-mac.tip".
  1118. % This macro source file is from the four volume series
  1119. % "TeX in Practice" by Stephan von Bechtolsheim, published
  1120. % 1993 by Springer-Verlag, New York.
  1121. % Copyright 1993 Stephan von Bechtolsheim.
  1122. % No warranty or liability is assumed.
  1123. % This macro may be copied freely if no fees other than
  1124. % media cost or shipping charges are charged and as long
  1125. % as this copyright and the following source code itself
  1126. % is not changed. Please see the series for further information.
  1127. %
  1128. % Version: 1.0
  1129. % Date: May 1, 1993
  1130. %
  1131. %
  1132. % This source code is documented in 18.3.8, p. III-41.
  1133. % Original source in file "tokens1.TEX", starting line 2427.
  1134. \wlog{L: "verb-mac.tip" ["tokens1.TEX," l. 2427, p. III-41]}%
  1135. % This file DOES belong to format "texip."
  1136. \InputD{ts-fonts.tip}
  1137. \InputD{verbdisp.tip}
  1138. \InputD{fexist.tip}
  1139. \catcode`\@ = 11
  1140. \def\ListVerb #1{% 
  1141.     \@StartVerbatim{1}% 
  1142.     \input #1
  1143.     \@DoneVerbatim
  1144. }
  1145. \def\ListVerbIfFileExists #1{% 
  1146.     \par
  1147.     \if\FileExistsConditional{#1}%
  1148.         \ListVerb{#1}% 
  1149.     \else
  1150.         \centerline{$\bullet$ File {\tt #1} not found. $\bullet$}%
  1151.         \wlog{\string\ListVerbIfFileExists: no file "#1".}%
  1152.     \fi
  1153. }
  1154. \def\ListVerbAndSource #1{% 
  1155.     \ListVerb{#1}% 
  1156.     \input #1
  1157. }
  1158. \catcode`\@ = 12
  1159. % Here the output of inputd ends "verb-mac.tip".
  1160.  
  1161.  
  1162. % Here begins "nctest.tip".
  1163. % This macro source file is from the four volume series
  1164. % "TeX in Practice" by Stephan von Bechtolsheim, published
  1165. % 1993 by Springer-Verlag, New York.
  1166. % Copyright 1993 Stephan von Bechtolsheim.
  1167. % No warranty or liability is assumed.
  1168. % This macro may be copied freely if no fees other than
  1169. % media cost or shipping charges are charged and as long
  1170. % as this copyright and the following source code itself
  1171. % is not changed. Please see the series for further information.
  1172. %
  1173. % Version: 1.0
  1174. % Date: May 1, 1993
  1175. %
  1176. %
  1177. % This source code is documented in 23.4.6.1, p. III-262.
  1178. % Original source in file "macros3.TEX", starting line 1335.
  1179. \wlog{L: "nctest.tip" ["macros3.TEX," l. 1335, p. III-262]}%
  1180. % This file DOES belong to format "texip."
  1181. \InputD{futlet.tip}
  1182. \catcode`\@ = 11
  1183. \def\NextCharTest #1#2#3{% 
  1184.     \def\@NextCharTestYes #1{#2}%
  1185.     \def\@NextCharTestNo {#3}%
  1186.     \DoFutureLet{\ifx}{#1}{\@NextCharTestYes}{\@NextCharTestNo}%
  1187. }
  1188. \catcode`\@ = 12
  1189. % Here the output of inputd ends "nctest.tip".
  1190.  
  1191.  
  1192. % Here begins "verb.tip".
  1193. % This macro source file is from the four volume series
  1194. % "TeX in Practice" by Stephan von Bechtolsheim, published
  1195. % 1993 by Springer-Verlag, New York.
  1196. % Copyright 1993 Stephan von Bechtolsheim.
  1197. % No warranty or liability is assumed.
  1198. % This macro may be copied freely if no fees other than
  1199. % media cost or shipping charges are charged and as long
  1200. % as this copyright and the following source code itself
  1201. % is not changed. Please see the series for further information.
  1202. %
  1203. % Version: 1.0
  1204. % Date: May 1, 1993
  1205. %
  1206. %
  1207. % This source code is documented in 18.3.4, p. III-35.
  1208. % Original source in file "tokens1.TEX", starting line 2077.
  1209. \wlog{L: "verb.tip" ["tokens1.TEX," l. 2077, p. III-35]}%
  1210. % This file DOES belong to format "texip."
  1211. \InputD{verb-bas.tip}
  1212. \InputD{nctest.tip}
  1213. \catcode`\@ = 11
  1214. {\catcode`\ = \active
  1215. \gdef\@InitActiveSpace{\edef {\VerbControlSpace}}}
  1216. \newif\if@VerbSpaceControl
  1217. \def\Verb{%
  1218.     \NextCharTest{*}{\@VerbSpaceControltrue \@VerbA}%
  1219.                     {\@VerbSpaceControlfalse\@VerbA}%
  1220. }
  1221. \def\@VerbA #1{%
  1222.     \bgroup
  1223.     \tt
  1224.     \MkOthers
  1225.     \if@VerbSpaceControl
  1226.     \else
  1227.         \catcode`\ = \active
  1228.         \@InitActiveSpace
  1229.     \fi
  1230.     \def\@VerbTemp ##1#1{%
  1231.         ##1%        % Simply print the argument.
  1232.         \egroup     % Undo font change and category code changes.
  1233.     }% 
  1234.     \@VerbTemp
  1235. }
  1236. \catcode`\@ = 12
  1237. % Here the output of inputd ends "verb.tip".
  1238.  
  1239.  
  1240. % Here begins "genaeol.tip".
  1241. % This macro source file is from the four volume series
  1242. % "TeX in Practice" by Stephan von Bechtolsheim, published
  1243. % 1993 by Springer-Verlag, New York.
  1244. % Copyright 1993 Stephan von Bechtolsheim.
  1245. % No warranty or liability is assumed.
  1246. % This macro may be copied freely if no fees other than
  1247. % media cost or shipping charges are charged and as long
  1248. % as this copyright and the following source code itself
  1249. % is not changed. Please see the series for further information.
  1250. %
  1251. % Version: 1.0
  1252. % Date: May 1, 1993
  1253. %
  1254. %
  1255. % This source code is documented in 21.9.7.1, p. III-192.
  1256. % Original source in file "macros1.TEX", starting line 2196.
  1257. \wlog{L: "genaeol.tip" ["macros1.TEX," l. 2196, p. III-192]}%
  1258. % This file DOES belong to format "texip."
  1259. \InputD{namedef.tip}
  1260. \InputD{verb-bas.tip}
  1261. \catcode`\@ = 11
  1262. \def\GenAeol #1{% 
  1263.     \edef #1{%
  1264.         \bgroup
  1265.         \noexpand\MakeEolActive
  1266.         \noexpand\@GenAeolOne{% 
  1267.             \csname\string #1-2\endcsname}%
  1268.     }%
  1269.     \NameDef{\string #1-2}##1%
  1270. }
  1271. {
  1272.     \MakeEolActive
  1273.     \gdef\@GenAeolOne #1#2
  1274.     {% 
  1275.         \egroup% 
  1276.         #1{#2}% 
  1277.     }%
  1278. }
  1279. \catcode`\@ = 12
  1280. % Here the output of inputd ends "genaeol.tip".
  1281.  
  1282.  
  1283. % Here begins "gobblemo.tip".
  1284. % This macro source file is from the four volume series
  1285. % "TeX in Practice" by Stephan von Bechtolsheim, published
  1286. % 1993 by Springer-Verlag, New York.
  1287. % Copyright 1993 Stephan von Bechtolsheim.
  1288. % No warranty or liability is assumed.
  1289. % This macro may be copied freely if no fees other than
  1290. % media cost or shipping charges are charged and as long
  1291. % as this copyright and the following source code itself
  1292. % is not changed. Please see the series for further information.
  1293. %
  1294. % Version: 1.0
  1295. % Date: May 1, 1993
  1296. %
  1297. %
  1298. % This source code is documented in 21.9.11, p. III-197.
  1299. % Original source in file "macros1.TEX", starting line 2417.
  1300. \wlog{L: "gobblemo.tip" ["macros1.TEX," l. 2417, p. III-197]}%
  1301. % This file DOES belong to format "texip."
  1302. \catcode`\@ = 11
  1303. \def\GobbleDoMore #1#2{%
  1304.     \def\@GobbleDoMore ##1#1{}%
  1305.     \expandafter#2\@GobbleDoMore
  1306. }
  1307. \catcode`\@ = 12
  1308. % Here the output of inputd ends "gobblemo.tip".
  1309.  
  1310.  
  1311. % Here begins "showx.tip".
  1312. % This macro source file is from the four volume series
  1313. % "TeX in Practice" by Stephan von Bechtolsheim, published
  1314. % 1993 by Springer-Verlag, New York.
  1315. % Copyright 1993 Stephan von Bechtolsheim.
  1316. % No warranty or liability is assumed.
  1317. % This macro may be copied freely if no fees other than
  1318. % media cost or shipping charges are charged and as long
  1319. % as this copyright and the following source code itself
  1320. % is not changed. Please see the series for further information.
  1321. %
  1322. % Version: 1.0
  1323. % Date: May 1, 1993
  1324. %
  1325. %
  1326. % This source code is documented in 21.5.11, p. III-178.
  1327. % Original source in file "macros1.TEX", starting line 1413.
  1328. \wlog{L: "showx.tip" ["macros1.TEX," l. 1413, p. III-178]}%
  1329. % This file DOES belong to format "texip."
  1330. \newif\ifShowX
  1331. \ShowXfalse
  1332. \def\ShowX #1{%
  1333.     \ifShowX
  1334.         {%
  1335.             \nonstopmode
  1336.             \show #1% 
  1337.         }%
  1338.     \fi
  1339. }
  1340. % Here the output of inputd ends "showx.tip".
  1341.  
  1342.  
  1343. % Here begins "testsubs.tip".
  1344. % This macro source file is from the four volume series
  1345. % "TeX in Practice" by Stephan von Bechtolsheim, published
  1346. % 1993 by Springer-Verlag, New York.
  1347. % Copyright 1993 Stephan von Bechtolsheim.
  1348. % No warranty or liability is assumed.
  1349. % This macro may be copied freely if no fees other than
  1350. % media cost or shipping charges are charged and as long
  1351. % as this copyright and the following source code itself
  1352. % is not changed. Please see the series for further information.
  1353. %
  1354. % Version: 1.0
  1355. % Date: May 1, 1993
  1356. %
  1357. %
  1358. % This source code is documented in 24.1.15.1, p. III-293.
  1359. % Original source in file "macros4.TEX", starting line 661.
  1360. \wlog{L: "testsubs.tip" ["macros4.TEX," l. 661, p. III-293]}%
  1361. % This file DOES belong to format "texip."
  1362. \InputD{showx.tip}
  1363. \catcode`\@ = 11
  1364. \newif\if@TestSubString
  1365. \def\SubStringConditional #1#2{%
  1366.     TT\fi
  1367.     \edef\@MainString{#1}%
  1368.     \edef\@SubStringConditionalTemp{{#1}{#2}}%
  1369.     \expandafter\@SubStringConditional\@SubStringConditionalTemp
  1370. }
  1371. \def\@SubStringConditional #1#2{% 
  1372.     \def\@TestSubS ##1#2##2\@Del{% 
  1373.         \def\@TestTemp{##1}% 
  1374.     }% 
  1375.     \ShowX{\@TestSubS}%
  1376.     \@TestSubS #1#2\@Del
  1377.     \ShowX{\@TestTemp}%
  1378.     \ifx\@MainString\@TestTemp
  1379.         \@TestSubStringfalse
  1380.     \else
  1381.         \@TestSubStringtrue
  1382.     \fi
  1383.     \if@TestSubString
  1384. }
  1385. \catcode`\@ = 12
  1386. % Here the output of inputd ends "testsubs.tip".
  1387.  
  1388.  
  1389. % Here begins "endrec.tip".
  1390. % This macro source file is from the four volume series
  1391. % "TeX in Practice" by Stephan von Bechtolsheim, published
  1392. % 1993 by Springer-Verlag, New York.
  1393. % Copyright 1993 Stephan von Bechtolsheim.
  1394. % No warranty or liability is assumed.
  1395. % This macro may be copied freely if no fees other than
  1396. % media cost or shipping charges are charged and as long
  1397. % as this copyright and the following source code itself
  1398. % is not changed. Please see the series for further information.
  1399. %
  1400. % Version: 1.0
  1401. % Date: May 1, 1993
  1402. %
  1403. %
  1404. % This source code is documented in 27.1.2, p. III-399.
  1405. % Original source in file "macros7.TEX", starting line 138.
  1406. \wlog{L: "endrec.tip" ["macros7.TEX," l. 138, p. III-399]}%
  1407. % This file DOES belong to format "texip."
  1408. \catcode`\@ = 11
  1409. \def\RecursionMacroEnd #1#2#3{% 
  1410.     #1\relax
  1411.         \def\@RecursionMacroEndNext{#2}% 
  1412.     \else
  1413.         \def\@RecursionMacroEndNext{#3}% 
  1414.     \fi
  1415.     \@RecursionMacroEndNext
  1416. }
  1417. \catcode`\@ = 12
  1418. % Here the output of inputd ends "endrec.tip".
  1419.  
  1420.  
  1421. % Here begins "restring.tip".
  1422. % This macro source file is from the four volume series
  1423. % "TeX in Practice" by Stephan von Bechtolsheim, published
  1424. % 1993 by Springer-Verlag, New York.
  1425. % Copyright 1993 Stephan von Bechtolsheim.
  1426. % No warranty or liability is assumed.
  1427. % This macro may be copied freely if no fees other than
  1428. % media cost or shipping charges are charged and as long
  1429. % as this copyright and the following source code itself
  1430. % is not changed. Please see the series for further information.
  1431. %
  1432. % Version: 1.0
  1433. % Date: May 1, 1993
  1434. %
  1435. %
  1436. % This source code is documented in 24.1.16, p. III-298.
  1437. % Original source in file "macros4.TEX", starting line 866.
  1438. \wlog{L: "restring.tip" ["macros4.TEX," l. 866, p. III-298]}%
  1439. % This file DOES belong to format "texip."
  1440. \InputD{testsubs.tip}
  1441. \InputD{endrec.tip}
  1442. \catcode`\@ = 11
  1443. \def\ReplaceSubStrings #1#2#3#4{%
  1444.     \def\@ReplaceResult{#1}%
  1445.     \edef\@ReplaceMain{#2}%
  1446.     \edef\@ReplaceSub{#3}%
  1447.     \edef\@ReplaceSubRep{#4}%
  1448.     \@ReplaceSubStrings
  1449. }
  1450. \def\@ReplaceSubStrings{% 
  1451.     \RecursionMacroEnd
  1452.         {\if\SubStringConditional{\@ReplaceMain}{\@ReplaceSub}}%
  1453.         {\@ReplaceSubStringsDo}{\@ReplaceSubStringsDone}%
  1454. }
  1455. \def\@ReplaceSubStringsDoX{%
  1456.     \def\@ReplaceSubStringsDoA ##1%
  1457. }%
  1458. \def\@ReplaceSubStringsDo{% 
  1459.     \expandafter\@ReplaceSubStringsDoX \@ReplaceSub
  1460.                                     ##2\@EndReplaceSubStrings{%
  1461.         \edef\@ReplaceMain{##1\@ReplaceSubRep ##2}%
  1462.     }%
  1463.     \ShowX{\@ReplaceSubStringsDoA}%
  1464.     \ShowX{\@ReplaceMain}%
  1465.     \expandafter\@ReplaceSubStringsDoA\@ReplaceMain
  1466.         \@EndReplaceSubStrings
  1467.     \ShowX{\@ReplaceMain}%
  1468.     \@ReplaceSubStrings
  1469. }
  1470. \def\@ReplaceSubStringsDone{% 
  1471.     \expandafter\edef\@ReplaceResult{\@ReplaceMain}%
  1472. }
  1473. \catcode`\@ = 12
  1474. % Here the output of inputd ends "restring.tip".
  1475.  
  1476.  
  1477. % Here begins "compst.tip".
  1478. % This macro source file is from the four volume series
  1479. % "TeX in Practice" by Stephan von Bechtolsheim, published
  1480. % 1993 by Springer-Verlag, New York.
  1481. % Copyright 1993 Stephan von Bechtolsheim.
  1482. % No warranty or liability is assumed.
  1483. % This macro may be copied freely if no fees other than
  1484. % media cost or shipping charges are charged and as long
  1485. % as this copyright and the following source code itself
  1486. % is not changed. Please see the series for further information.
  1487. %
  1488. % Version: 1.0
  1489. % Date: May 1, 1993
  1490. %
  1491. %
  1492. % This source code is documented in 25.1.17.1, p. III-334.
  1493. % Original source in file "macros5.TEX", starting line 1018.
  1494. \wlog{L: "compst.tip" ["macros5.TEX," l. 1018, p. III-334]}%
  1495. % This file DOES belong to format "texip."
  1496. \InputD{restring.tip}
  1497. \catcode`\@ = 11
  1498. \def\StringsEqualConditional #1#2{% 
  1499.     TT\fi
  1500.     \edef\@StringsEqualOneConditional{#1}% 
  1501.     \edef\@StringsEqualTwoConditional{#2}% 
  1502.     \ifx\@StringsEqualOneConditional\@StringsEqualTwoConditional
  1503. }
  1504. \def\EmptyStringConditional #1{%
  1505.     TT\fi
  1506.     \if\StringsEqualConditional{#1}{}%
  1507. }
  1508. \def\EmptyStringConditionalISpaces #1{%
  1509.     TT\fi
  1510.     \ReplaceSubStrings{\@EmptyStringConditionalISpaces}{#1}%
  1511.         { }{}%
  1512.     \if\EmptyStringConditional
  1513.         {\@EmptyStringConditionalISpaces}%
  1514. }
  1515. \catcode`\@ = 12
  1516. % Here the output of inputd ends "compst.tip".
  1517.  
  1518.  
  1519. % Here begins "remtlsp.tip".
  1520. % This macro source file is from the four volume series
  1521. % "TeX in Practice" by Stephan von Bechtolsheim, published
  1522. % 1993 by Springer-Verlag, New York.
  1523. % Copyright 1993 Stephan von Bechtolsheim.
  1524. % No warranty or liability is assumed.
  1525. % This macro may be copied freely if no fees other than
  1526. % media cost or shipping charges are charged and as long
  1527. % as this copyright and the following source code itself
  1528. % is not changed. Please see the series for further information.
  1529. %
  1530. % Version: 1.0
  1531. % Date: May 1, 1993
  1532. %
  1533. %
  1534. % This source code is documented in 24.1.20.1, p. III-309.
  1535. % Original source in file "macros4.TEX", starting line 1412.
  1536. \wlog{L: "remtlsp.tip" ["macros4.TEX," l. 1412, p. III-309]}%
  1537. % This file DOES belong to format "texip."
  1538. \InputD{compst.tip}
  1539. \catcode`\@ = 11
  1540. \def\@TestTrail #1 #2\@Del{% 
  1541.     \def\@RemTspTemp{#1}%
  1542. }
  1543. \def\RemTsp #1#2{%
  1544.     \edef\@RemTspTempOne{#2#2 }% 
  1545.     \expandafter\@TestTrail\@RemTspTempOne\@Del
  1546.     \if\StringsEqualConditional{#2#2}{\@RemTspTemp}% 
  1547.         \def#1{#2}% 
  1548.     \else
  1549.         \edef\@RemTspTempA{\noexpand\edef\noexpand#1{\@RemTspTemp}}%
  1550.         \@RemTspTempA
  1551.     \fi
  1552. }
  1553. \def\@TestLead #1 #2\@Del{\def\@RemLspOne{#1}}
  1554. \def\RemLsp #1#2{%
  1555.     \edef\@TempRemLsp{#2#2\space}%
  1556.     \expandafter\@TestLead\@TempRemLsp\@Del
  1557.     \if\EmptyStringConditional{\@RemLspOne}% 
  1558.         \expandafter\@RemLspThree #2\@Del{#1}% 
  1559.     \else
  1560.         \def#1{#2}%
  1561.     \fi
  1562. }
  1563. \edef\@RemLspTwo{% 
  1564.     \def\noexpand\@RemLspThree\space ##1\noexpand\@Del##2{% 
  1565.         \def##2{##1}% 
  1566.     }% 
  1567. }
  1568. \@RemLspTwo
  1569. \catcode`\@ = 12
  1570. % Here the output of inputd ends "remtlsp.tip".
  1571.  
  1572.  
  1573. % Here begins "genostr.tip".
  1574. % This macro source file is from the four volume series
  1575. % "TeX in Practice" by Stephan von Bechtolsheim, published
  1576. % 1993 by Springer-Verlag, New York.
  1577. % Copyright 1993 Stephan von Bechtolsheim.
  1578. % No warranty or liability is assumed.
  1579. % This macro may be copied freely if no fees other than
  1580. % media cost or shipping charges are charged and as long
  1581. % as this copyright and the following source code itself
  1582. % is not changed. Please see the series for further information.
  1583. %
  1584. % Version: 1.0
  1585. % Date: May 1, 1993
  1586. %
  1587. %
  1588. % This source code is documented in 28.5.3, p. III-474.
  1589. % Original source in file "io1.TEX", starting line 1339.
  1590. \wlog{L: "genostr.tip" ["io1.TEX," l. 1339, p. III-474]}%
  1591. % This file DOES belong to format "texip."
  1592. \catcode`\@ = 11
  1593. \newwrite\GenericOStream
  1594. \newif\if@GenericOStreamOpen
  1595. \@GenericOStreamOpenfalse
  1596. \def\OpenGenericOStream #1{%
  1597.     \if@GenericOStreamOpen
  1598.         \errmessage{\string\OpenGenericOStream: generic
  1599.             output stream currently open.}%
  1600.     \else
  1601.         \global\@GenericOStreamOpentrue
  1602.         \immediate\openout\GenericOStream = #1%
  1603.     \fi 
  1604. }
  1605. \def\CloseGenericOStream{%
  1606.     \if@GenericOStreamOpen
  1607.         \global\@GenericOStreamOpenfalse
  1608.         \immediate\closeout\GenericOStream
  1609.     \else
  1610.         \errhelp{Stream not in use.}%
  1611.         \errmessage{\string\CloseGenericOStream:
  1612.             stream is NOT open for output.}%
  1613.     \fi 
  1614. }
  1615. \catcode`\@ = 12
  1616. % Here the output of inputd ends "genostr.tip".
  1617.  
  1618.  
  1619. % Here begins "cstostrc.tip".
  1620. % This macro source file is from the four volume series
  1621. % "TeX in Practice" by Stephan von Bechtolsheim, published
  1622. % 1993 by Springer-Verlag, New York.
  1623. % Copyright 1993 Stephan von Bechtolsheim.
  1624. % No warranty or liability is assumed.
  1625. % This macro may be copied freely if no fees other than
  1626. % media cost or shipping charges are charged and as long
  1627. % as this copyright and the following source code itself
  1628. % is not changed. Please see the series for further information.
  1629. %
  1630. % Version: 1.0
  1631. % Date: May 1, 1993
  1632. %
  1633. %
  1634. % This source code is documented in 19.1.2, p. III-67.
  1635. % Original source in file "tokens2.TEX", starting line 146.
  1636. \wlog{L: "cstostrc.tip" ["tokens2.TEX," l. 146, p. III-67]}%
  1637. % This file DOES belong to format "texip."
  1638. \InputD{remtlsp.tip}
  1639. \InputD{genostr.tip}
  1640. \catcode`\@ = 11
  1641. \newread\@CatIn
  1642. \def\CSToStringCat #1#2{%
  1643.     {%
  1644.         \escapechar = -1
  1645.         \OpenGenericOStream{cstostrc.tmp}%
  1646.         \immediate\write\GenericOStream{\string#2\%}%
  1647.         \CloseGenericOStream
  1648.         \openin\@CatIn = cstostrc.tmp
  1649.         \global\read\@CatIn to #1%
  1650.         \closein\@CatIn
  1651.     }%
  1652. }
  1653. \catcode`\@ = 12
  1654. % Here the output of inputd ends "cstostrc.tip".
  1655.  
  1656.  
  1657. % Here begins "verbwr.tip".
  1658. % This macro source file is from the four volume series
  1659. % "TeX in Practice" by Stephan von Bechtolsheim, published
  1660. % 1993 by Springer-Verlag, New York.
  1661. % Copyright 1993 Stephan von Bechtolsheim.
  1662. % No warranty or liability is assumed.
  1663. % This macro may be copied freely if no fees other than
  1664. % media cost or shipping charges are charged and as long
  1665. % as this copyright and the following source code itself
  1666. % is not changed. Please see the series for further information.
  1667. %
  1668. % Version: 1.0
  1669. % Date: May 1, 1993
  1670. %
  1671. %
  1672. % This source code is documented in 29.3.2, p. III-506.
  1673. % Original source in file "io2.TEX", starting line 973.
  1674. \wlog{L: "verbwr.tip" ["io2.TEX," l. 973, p. III-506]}%
  1675. % This file DOES belong to format "texip."
  1676. \InputD{verb-bas.tip}
  1677. \InputD{futlet.tip}
  1678. \InputD{genaeol.tip}
  1679. \InputD{futlet.tip}
  1680. \InputD{gobblemo.tip}
  1681. \InputD{cstostrc.tip}
  1682. \catcode`\@ = 11
  1683. \newif\if@VerbFirstLineSuppress
  1684. \def\OpenVerbWrFile #1#2#3{%
  1685.     \immediate\openout #3 = #1.#2
  1686.     \wlog{\string\OpenVerbWrFile: opened "#1.#2" for
  1687.         literal writing.}%
  1688. }
  1689. \def\CloseVerbWrFile #1{%
  1690.     \immediate\closeout #1
  1691.     \wlog{\string\CloseVerbWrFile: closed file for literal writing.}%
  1692. }
  1693. \def\BeginVerbWr #1#2{%
  1694.     \begingroup
  1695.     \def\@VerbWrStream{#1}%
  1696.     \CSToStringCat{\@EndVerbWrSt}{#2}%
  1697.     \wlog{\string\BeginVerbWr: begin}% 
  1698.     \MkOthers
  1699.     \MakeEolActive
  1700.     \@VerbWrTabHandling
  1701.     \@VerbFirstLineSuppresstrue
  1702.     \expandafter\expandafter\expandafter
  1703.         \@BeginVerbWrY\expandafter{\@EndVerbWrSt}%
  1704. }
  1705. {
  1706.     \catcode `| = 0
  1707.     \catcode`\\ =12
  1708.     |gdef|@BeginVerbWrY #1{%
  1709.         |def|@BeginVerbWrX ##1\#1{%
  1710.             |@BeginVerbWr ##1% 
  1711.             |@VerbWrDoneToken
  1712.             |@VerbWrDone
  1713.         }
  1714.         |@BeginVerbWrX
  1715.     }
  1716. }
  1717. \def\@VerbWrTabHandling{%
  1718.     \MakeTabActive
  1719.     \@VerbWrTabHandlingOne
  1720. }
  1721. {\MakeTabActive
  1722. \gdef\@VerbWrTabHandlingOne{\def^^I{\@TabAsLiteral}}% 
  1723. }
  1724. \def\@BeginVerbWr{% 
  1725.     \DoFutureLet{\ifx}% 
  1726.         {\@VerbWrDoneToken}% 
  1727.         {\GobbleDoMore
  1728.             {\@VerbWrDoneToken}{\relax}}%
  1729.         {\@BeginVerbWrTwo}% 
  1730. }
  1731. \GenAeol{\@BeginVerbWrTwo}{%
  1732.     \if@VerbFirstLineSuppress
  1733.         \@VerbFirstLineSuppressfalse
  1734.     \else
  1735.         \immediate\write\@VerbWrStream{#1}%
  1736.     \fi
  1737.     \@BeginVerbWr
  1738. }
  1739. \def\@VerbWrDone{% 
  1740.     \endgroup
  1741.     \wlog{\string\@VerbWrDone: done}%
  1742. }
  1743. \catcode`\@ = 12
  1744. % Here the output of inputd ends "verbwr.tip".
  1745.  
  1746.  
  1747. % Here begins "defauarg.tip".
  1748. % This macro source file is from the four volume series
  1749. % "TeX in Practice" by Stephan von Bechtolsheim, published
  1750. % 1993 by Springer-Verlag, New York.
  1751. % Copyright 1993 Stephan von Bechtolsheim.
  1752. % No warranty or liability is assumed.
  1753. % This macro may be copied freely if no fees other than
  1754. % media cost or shipping charges are charged and as long
  1755. % as this copyright and the following source code itself
  1756. % is not changed. Please see the series for further information.
  1757. %
  1758. % Version: 1.0
  1759. % Date: May 1, 1993
  1760. %
  1761. %
  1762. % This source code is documented in 23.4.8.1, p. III-266.
  1763. % Original source in file "macros3.TEX", starting line 1514.
  1764. \wlog{L: "defauarg.tip" ["macros3.TEX," l. 1514, p. III-266]}%
  1765. % This file DOES belong to format "texip."
  1766. \InputD{gobblemo.tip}
  1767. \catcode`\@ = 11
  1768. \def\DefaultArg #1#2#3{%
  1769.     \def\@DefaultArgMacro{#1}%
  1770.     \edef\@EmptyOtherArg{#2}%
  1771.     \edef\@DefaultArgDefault{#3}%
  1772.     \@DefaultArg #2\@DefaultArgEnd
  1773. }
  1774. \def\@DefaultArg{%
  1775.     \futurelet\@DefaultArgSymbol\@DefaultArgOne
  1776. }
  1777. \def\@DefaultArgOne{%
  1778.     \ifx\@DefaultArgSymbol\@DefaultArgEnd
  1779.         \expandafter\edef\@DefaultArgMacro{\@DefaultArgDefault}% 
  1780.     \else
  1781.         \expandafter\edef\@DefaultArgMacro{\@EmptyOtherArg}% 
  1782.     \fi
  1783.     \GobbleDoMore{\@DefaultArgEnd}{\relax}%
  1784. }
  1785. \catcode`\@ = 12
  1786. % Here the output of inputd ends "defauarg.tip".
  1787.  
  1788.  
  1789. % Here begins "vwrt-mac.tip".
  1790. % This macro source file is from the four volume series
  1791. % "TeX in Practice" by Stephan von Bechtolsheim, published
  1792. % 1993 by Springer-Verlag, New York.
  1793. % Copyright 1993 Stephan von Bechtolsheim.
  1794. % No warranty or liability is assumed.
  1795. % This macro may be copied freely if no fees other than
  1796. % media cost or shipping charges are charged and as long
  1797. % as this copyright and the following source code itself
  1798. % is not changed. Please see the series for further information.
  1799. %
  1800. % Version: 1.0
  1801. % Date: May 1, 1993
  1802. %
  1803. %
  1804. % This source code is documented in 29.3.3.1, p. III-511.
  1805. % Original source in file "io2.TEX", starting line 1192.
  1806. \wlog{L: "vwrt-mac.tip" ["io2.TEX," l. 1192, p. III-511]}%
  1807. % This file DOES belong to format "texip."
  1808. \InputD{verbwr.tip}
  1809. \InputD{defauarg.tip}
  1810. \InputD{verb-mac.tip}
  1811. \catcode`\@ = 11
  1812. \newwrite\@VStream
  1813. \newif\if@VStreamOpen
  1814. \@VStreamOpenfalse
  1815. \newcount\@VerbWriteCount
  1816. \@VerbWriteCount = 0
  1817. \def\BeginVerbWrite #1#2{%
  1818.     \global\advance\@VerbWriteCount by 1
  1819.     \wlog{\string\BeginVerbWrite: [\the\@VerbWriteCount]}%
  1820.     \DefaultArg{\@VerbWriteBaseName}{#1}{\jobname}%
  1821.     \DefaultArg{\@VerbWriteFileExt}{#2}{ver}% 
  1822.     \xdef\@VerbWriteFileName{\@VerbWriteBaseName.\@VerbWriteFileExt}%
  1823.     \if@VStreamOpen
  1824.         \errmessage{\string\BeginVerbWrite: ERROR, file still open.}%
  1825.     \fi
  1826.     \OpenVerbWrFile{\@VerbWriteBaseName}{\@VerbWriteFileExt}% 
  1827.                     {\@VStream}%
  1828.     \global\@VStreamOpentrue
  1829.     \BeginVerbWr{\@VStream}{\EndVerbWrite}%
  1830. }
  1831. \def\CloseVerbWriteFile{% 
  1832.     \if@VStreamOpen
  1833.         \CloseVerbWrFile{\@VStream}%
  1834.         \global\@VStreamOpenfalse
  1835.     \fi
  1836. }
  1837. \def\AppendVerbWrite{%
  1838.     \wlog{\string\AppendVerbWrite: [\the\@VerbWriteCount]}%
  1839.     \if@VStreamOpen
  1840.     \else
  1841.         \errmessage{\string\AppendVerbWrite: no file open.}%
  1842.     \fi
  1843.     \xdef\@VerbWriteFileName{\@VerbWriteBaseName.\@VerbWriteFileExt}%
  1844.     \BeginVerbWr{\@VStream}{\EndVerbWrite}%
  1845. }
  1846. \def\VerbAsVerb{%
  1847.     \CloseVerbWriteFile
  1848.     {%
  1849.         \CaretTabtrue
  1850.         \ListVerb{\@VerbWriteFileName}%
  1851.     }%
  1852. }
  1853. \def\VerbAsSource{%
  1854.     \CloseVerbWriteFile
  1855.     \input \@VerbWriteFileName \relax
  1856. }
  1857. \catcode`\@ = 12
  1858. % Here the output of inputd ends "vwrt-mac.tip".
  1859.  
  1860.  
  1861. % Here begins "lpagetg.tip".
  1862. % This macro source file is from the four volume series
  1863. % "TeX in Practice" by Stephan von Bechtolsheim, published
  1864. % 1993 by Springer-Verlag, New York.
  1865. % Copyright 1993 Stephan von Bechtolsheim.
  1866. % No warranty or liability is assumed.
  1867. % This macro may be copied freely if no fees other than
  1868. % media cost or shipping charges are charged and as long
  1869. % as this copyright and the following source code itself
  1870. % is not changed. Please see the series for further information.
  1871. %
  1872. % Version: 1.0
  1873. % Date: May 1, 1993
  1874. %
  1875. %
  1876. % This source code is documented in 32.2.3, p. IV-5.
  1877. % Original source in file "page.TEX", starting line 298.
  1878. \wlog{L: "lpagetg.tip" ["page.TEX," l. 298, p. IV-5]}%
  1879. % This file DOES belong to format "texip."
  1880. \def\LogPageTG #1{% 
  1881.     \wlog{\string\LogPageTG [#1]:}%
  1882.     \wlog{\string\pagetotal: \the\pagetotal,
  1883.         \string\pagegoal: \the\pagegoal}% 
  1884. }
  1885. % Here the output of inputd ends "lpagetg.tip".
  1886.  
  1887.  
  1888. % Here begins "freespac.tip".
  1889. % This macro source file is from the four volume series
  1890. % "TeX in Practice" by Stephan von Bechtolsheim, published
  1891. % 1993 by Springer-Verlag, New York.
  1892. % Copyright 1993 Stephan von Bechtolsheim.
  1893. % No warranty or liability is assumed.
  1894. % This macro may be copied freely if no fees other than
  1895. % media cost or shipping charges are charged and as long
  1896. % as this copyright and the following source code itself
  1897. % is not changed. Please see the series for further information.
  1898. %
  1899. % Version: 1.0
  1900. % Date: May 1, 1993
  1901. %
  1902. %
  1903. % This source code is documented in 32.2.4, p. IV-6.
  1904. % Original source in file "page.TEX", starting line 340.
  1905. \wlog{L: "freespac.tip" ["page.TEX," l. 340, p. IV-6]}%
  1906. % This file DOES belong to format "texip."
  1907. \InputD{lpagetg.tip}
  1908. \newdimen\FreePageSpace
  1909. \def\ComputeFreeSpaceOnPage{%
  1910.     \par
  1911.     \LogPageTG{\string\ComputeFreeSpaceOnPage}%
  1912.     \ifdim\pagetotal = 0pt
  1913.         \FreePageSpace = \vsize
  1914.     \else
  1915.         \FreePageSpace = \pagegoal
  1916.         \advance\FreePageSpace by -\pagetotal
  1917.     \fi
  1918. }
  1919. \def\FreeSpaceConditional{%
  1920.     0pt = 0pt \fi
  1921.     \ComputeFreeSpaceOnPage
  1922.     \ifdim\FreePageSpace
  1923. }
  1924. % Here the output of inputd ends "freespac.tip".
  1925.  
  1926.  
  1927. % Here begins "ts-verb1.tip".
  1928. % This macro source file is from the four volume series
  1929. % "TeX in Practice" by Stephan von Bechtolsheim, published
  1930. % 1993 by Springer-Verlag, New York.
  1931. % Copyright 1993 Stephan von Bechtolsheim.
  1932. % No warranty or liability is assumed.
  1933. % This macro may be copied freely if no fees other than
  1934. % media cost or shipping charges are charged and as long
  1935. % as this copyright and the following source code itself
  1936. % is not changed. Please see the series for further information.
  1937. %
  1938. % Version: 1.0
  1939. % Date: May 1, 1993
  1940. %
  1941. %
  1942. % This source code is documented in 18.3.14.1, p. III-56.
  1943. % Original source in file "tokens1.TEX", starting line 3223.
  1944. \wlog{L: "ts-verb1.tip" ["tokens1.TEX," l. 3223, p. III-56]}%
  1945. % This file DOES belong to format "texip."
  1946. \InputD{verbdisp.tip}
  1947. \catcode`\@ = 11
  1948. \def\@btex{% 
  1949.     \par
  1950.     \bgroup
  1951.     \small
  1952. }
  1953. \def\@etex{%
  1954.     \nobreak
  1955.     \egroup
  1956.     \if\FormatIsLaTeXConditional
  1957.         \def\@EtexEnd{}%
  1958.     \else   
  1959.         \def\@EtexEnd{%
  1960.             \ParLookAhead 
  1961.                 {}%
  1962.                 {\SuppressNextParIndent}%
  1963.         }%
  1964.     \fi
  1965.     \@EtexEnd
  1966. }
  1967. \def\btex{% 
  1968.     \@btex
  1969.     \@StartVerbatim{0}% 
  1970.     \btex@more
  1971. }
  1972. {
  1973.     \catcode `| =  0 % | becomes escape character.
  1974.     \catcode`\\ = 12 % \ now prints.
  1975.     |gdef|btex@more #1\etex{% 
  1976.         #1% 
  1977.         |@DoneVerbatim
  1978.         |@etex
  1979.     }%
  1980. }
  1981. \catcode`\@ = 12
  1982. % Here the output of inputd ends "ts-verb1.tip".
  1983.  
  1984.  
  1985. % Here begins "ts-verb2.tip".
  1986. % This macro source file is from the four volume series
  1987. % "TeX in Practice" by Stephan von Bechtolsheim, published
  1988. % 1993 by Springer-Verlag, New York.
  1989. % Copyright 1993 Stephan von Bechtolsheim.
  1990. % No warranty or liability is assumed.
  1991. % This macro may be copied freely if no fees other than
  1992. % media cost or shipping charges are charged and as long
  1993. % as this copyright and the following source code itself
  1994. % is not changed. Please see the series for further information.
  1995. %
  1996. % Version: 1.0
  1997. % Date: May 1, 1993
  1998. %
  1999. %
  2000. % This source code is documented in 18.3.14.2, p. III-57.
  2001. % Original source in file "tokens1.TEX", starting line 3279.
  2002. \wlog{L: "ts-verb2.tip" ["tokens1.TEX," l. 3279, p. III-57]}%
  2003. % This file DOES belong to format "texip."
  2004. \catcode`\@ = 11
  2005. \def\Btexalt{% 
  2006.     \@btex
  2007.     \@StartVerbatim{0}% 
  2008.     \btex@morealt
  2009. }
  2010. {
  2011.     \catcode `| =  0 % | becomes escape character.
  2012.     \catcode`\\ = 12 % \ now prints.
  2013.     |gdef|btex@morealt #1\Etexalt{% 
  2014.         #1% 
  2015.         |@DoneVerbatim
  2016.         |@etex
  2017.     }%
  2018. }
  2019. \catcode`\@ = 12
  2020. % Here the output of inputd ends "ts-verb2.tip".
  2021.  
  2022.  
  2023. % Here begins "ts-verb.tip".
  2024. % This macro source file is from the four volume series
  2025. % "TeX in Practice" by Stephan von Bechtolsheim, published
  2026. % 1993 by Springer-Verlag, New York.
  2027. % Copyright 1993 Stephan von Bechtolsheim.
  2028. % No warranty or liability is assumed.
  2029. % This macro may be copied freely if no fees other than
  2030. % media cost or shipping charges are charged and as long
  2031. % as this copyright and the following source code itself
  2032. % is not changed. Please see the series for further information.
  2033. %
  2034. % Version: 1.1
  2035. % Date: Sep 9, 1993
  2036. %
  2037. %
  2038. % This source code is documented in 18.3.15, p. III-57.
  2039. % Original source in file "tokens1.TEX", starting line 3306.
  2040. \wlog{L: "ts-verb.tip" ["tokens1.TEX," l. 3306, p. III-57]}%
  2041. % This file DOES belong to format "texip."
  2042. \InputD{verbdisp.tip}
  2043. \InputD{verb-mac.tip}
  2044. \InputD{verb.tip}
  2045. \InputD{verbwr.tip}
  2046. \InputD{vwrt-mac.tip}
  2047. \InputD{defauarg.tip}
  2048. \InputD{compst.tip}
  2049. \InputD{testsubs.tip}
  2050. \InputD{freespac.tip}
  2051. \InputD{fexist.tip}
  2052. \InputD{ts-verb1.tip}
  2053. \InputD{ts-verb2.tip}
  2054. \catcode`\@ = 11
  2055. \def\verb{\Verb}
  2056. \VerbLineNumtrue
  2057. \VerbatimTab = 4
  2058. \DisplayVerbatimVskip = 5pt
  2059. \def\VerbatimFont{\small\tt}%
  2060. \def\ListVerbTeXIP #1{%
  2061.     \par
  2062.     \medskip
  2063.     \vskip 60pt
  2064.     \vskip -60pt
  2065.     \def\ListAsFileName{#1}% 
  2066.     \def\LabelName{code-#1}% 
  2067.     \if\SuffixConditional{#1}{.flf}% 
  2068.         \def\ListAsFileName ##1.flf{\def\ListAsFileName{##1.log}}%
  2069.         \ListAsFileName #1% 
  2070.         \def\LabelName{}%
  2071.     \else
  2072.     \if\SuffixConditional{#1}{.flf2}%
  2073.         \def\ListAsFileName ##1.flf2{\def\ListAsFileName{##1.log}}%
  2074.         \ListAsFileName #1% 
  2075.         \def\LabelName{}%
  2076.     \fi
  2077.     \fi
  2078.     \if\StringsEqualConditional{#1}{\jobname.ver}%
  2079.         \def\ListAsFileName{}%
  2080.         \def\LabelName{}%
  2081.     \fi
  2082.     \if\StringsEqualConditional{#1}{ex-verbwr.ver}
  2083.         \def\LabelName{}% 
  2084.     \fi
  2085.     \if\EmptyStringConditional{\LabelName}% 
  2086.     \else
  2087.         \Label{code-#1}% 
  2088.     \fi
  2089.     \if\EmptyStringConditional{\ListAsFileName}
  2090.     \else
  2091.         \centerline{% 
  2092.             $\bullet$% 
  2093.             \space
  2094.             \tt\ListAsFileName
  2095.             \space
  2096.             $\bullet$% 
  2097.         }%
  2098.     \fi
  2099.     \@btex
  2100.     \@StartVerbatim{1}% 
  2101.     \wlog{[\string\ListVerbTeXIP:}%
  2102.     \input #1
  2103.     \wlog{]}%   svb: this was \message before
  2104.     \@DoneVerbatim
  2105.     \@etex
  2106. }
  2107. \catcode`\@ = 12
  2108. % Here the output of inputd ends "ts-verb.tip".
  2109.  
  2110.  
  2111. % Here begins "ts-lazy.tip".
  2112. % This macro source file is from the four volume series
  2113. % "TeX in Practice" by Stephan von Bechtolsheim, published
  2114. % 1993 by Springer-Verlag, New York.
  2115. % Copyright 1993 Stephan von Bechtolsheim.
  2116. % No warranty or liability is assumed.
  2117. % This macro may be copied freely if no fees other than
  2118. % media cost or shipping charges are charged and as long
  2119. % as this copyright and the following source code itself
  2120. % is not changed. Please see the series for further information.
  2121. %
  2122. % Version: 1.0
  2123. % Date: May 1, 1993
  2124. %
  2125. %
  2126. % This source code is documented in 21.4.10, p. III-167.
  2127. % Original source in file "macros1.TEX", starting line 849.
  2128. \wlog{L: "ts-lazy.tip" ["macros1.TEX," l. 849, p. III-167]}%
  2129. % This file DOES belong to format "texip."
  2130. \def\TeXIP{%
  2131.     \TeX{} in Practice%
  2132. }
  2133. \def\WEB{% 
  2134.     {\tt WEB}% 
  2135. }
  2136. % Here the output of inputd ends "ts-lazy.tip".
  2137.  
  2138.  
  2139. % Here begins "ts-brefm.tip".
  2140. % This macro source file is from the four volume series
  2141. % "TeX in Practice" by Stephan von Bechtolsheim, published
  2142. % 1993 by Springer-Verlag, New York.
  2143. % Copyright 1993 Stephan von Bechtolsheim.
  2144. % No warranty or liability is assumed.
  2145. % This macro may be copied freely if no fees other than
  2146. % media cost or shipping charges are charged and as long
  2147. % as this copyright and the following source code itself
  2148. % is not changed. Please see the series for further information.
  2149. %
  2150. % Version: 1.0
  2151. % Date: May 1, 1993
  2152. %
  2153. %
  2154. % This source code is documented in 21.4.11, p. III-167.
  2155. % Original source in file "macros1.TEX", starting line 881.
  2156. \wlog{L: "ts-brefm.tip" ["macros1.TEX," l. 881, p. III-167]}%
  2157. % This file DOES belong to format "texip."
  2158. \def\Bref #1#2#3{% 
  2159.     #1 (19#2#3)% 
  2160. }
  2161. % Here the output of inputd ends "ts-brefm.tip".
  2162.  
  2163.  
  2164. % Here begins "parv-1.tip".
  2165. % This macro source file is from the four volume series
  2166. % "TeX in Practice" by Stephan von Bechtolsheim, published
  2167. % 1993 by Springer-Verlag, New York.
  2168. % Copyright 1993 Stephan von Bechtolsheim.
  2169. % No warranty or liability is assumed.
  2170. % This macro may be copied freely if no fees other than
  2171. % media cost or shipping charges are charged and as long
  2172. % as this copyright and the following source code itself
  2173. % is not changed. Please see the series for further information.
  2174. %
  2175. % Version: 1.0
  2176. % Date: May 1, 1993
  2177. %
  2178. %
  2179. % This source code is documented in 11.2.1, p. II-67.
  2180. % Original source in file "par2.TEX", starting line 956.
  2181. \wlog{L: "parv-1.tip" ["par2.TEX," l. 956, p. II-67]}%
  2182. % This file DOES belong to format "texip."
  2183. \catcode`\@ = 11
  2184. \newdimen \Delta@XY
  2185. \newskip\@ParListBeforeAfter
  2186. \newskip\@ParListBetweenLabels
  2187. \newskip\@ParListAfterLabel
  2188. \newcount\@LabeledParNesting    \@LabeledParNesting = 0
  2189. \newcount\@LabelCounter
  2190. \def\BeginAList #1#2#3#4#5#6#7{%
  2191.     \par
  2192.     \bgroup
  2193.     \advance\leftskip by #1
  2194.     \advance\rightskip by #2
  2195.     \advance \@LabeledParNesting by 1
  2196.     \@LabelCounter = 0
  2197.     \Delta@XY = #3
  2198.     \ifdim\Delta@XY < 0pt
  2199.         \errmessage{\string\BeginAList: negative Delta{xy},
  2200.             made positive.}%
  2201.     \fi
  2202.     \@ParListBeforeAfter = #4   
  2203.     \@ParListBetweenLabels = #5
  2204.     \@ParListAfterLabel = #6
  2205.     \SetParIndent{#7}
  2206. }
  2207. \def\EndAList{% 
  2208.     \par
  2209.     \vskip\@ParListBeforeAfter
  2210.     \egroup
  2211. }
  2212. \def\@GenLabel #1{%
  2213.     \par
  2214.     \advance\@LabelCounter by 1
  2215.     \ifnum\@LabelCounter = 1
  2216.         \parskip = \@ParListBeforeAfter
  2217.     \else
  2218.         \parskip = \@ParListBetweenLabels
  2219.     \fi
  2220.     \noindent
  2221.     \hbox to 0pt{#1}%
  2222.     \parskip = \@ParListAfterLabel
  2223.     \ignorespaces
  2224. }
  2225. \def\ItemLL #1{% 
  2226.     \@GenLabel{%
  2227.         \hskip -\Delta@XY
  2228.         #1%
  2229.         \hfil
  2230.     }%
  2231. }
  2232. \def\ItemLR #1{%
  2233.     \@GenLabel{%
  2234.         \hss
  2235.         #1%
  2236.         \hskip\Delta@XY
  2237.     }%
  2238. }
  2239. \def\ItemRL #1{%
  2240.     \@GenLabel{%
  2241.         \hskip\Delta@XY
  2242.         #1%
  2243.         \hss
  2244.     }%
  2245. }
  2246. \def\ItemRR #1{%
  2247.     \@GenLabel{%
  2248.         \hfil
  2249.         #1%
  2250.         \hskip -\Delta@XY
  2251.     }%
  2252. }
  2253. \catcode`\@ = 12
  2254. % Here the output of inputd ends "parv-1.tip".
  2255.  
  2256.  
  2257. % Here begins "itemizel.tip".
  2258. % This macro source file is from the four volume series
  2259. % "TeX in Practice" by Stephan von Bechtolsheim, published
  2260. % 1993 by Springer-Verlag, New York.
  2261. % Copyright 1993 Stephan von Bechtolsheim.
  2262. % No warranty or liability is assumed.
  2263. % This macro may be copied freely if no fees other than
  2264. % media cost or shipping charges are charged and as long
  2265. % as this copyright and the following source code itself
  2266. % is not changed. Please see the series for further information.
  2267. %
  2268. % Version: 1.0
  2269. % Date: May 1, 1993
  2270. %
  2271. %
  2272. % This source code is documented in 11.3.3, p. II-77.
  2273. % Original source in file "par2.TEX", starting line 1465.
  2274. \wlog{L: "itemizel.tip" ["par2.TEX," l. 1465, p. II-77]}%
  2275. % This file DOES belong to format "texip."
  2276. \InputD{parv-1.tip}
  2277. \catcode`\@ = 11
  2278. \newcount\@ItemListDepth
  2279. \@ItemListDepth = 0
  2280. \def\BeginItemize{% 
  2281.     \begingroup
  2282.     \global\advance\@ItemListDepth by 1
  2283.     \ifcase\@ItemListDepth\or
  2284.         \@BeginItemizeLevelOne
  2285.         \def\Item{\ItemLL{$\bullet$}}%
  2286.     \or
  2287.         \@BeginItemizeLevelTwo
  2288.         \def\Item{\ItemLL{--}}%
  2289.     \or
  2290.         \@BeginItemizeLevelThree
  2291.         \def\Item{\ItemLL{*}}%
  2292.     \or
  2293.         \@BeginItemizeLevelFour
  2294.         \def\Item{\ItemLL{+}}%
  2295.     \else
  2296.         \errmessage{\string\BeginItemize: maximum nesting of
  2297.             4 exceeded.}%
  2298.     \fi
  2299. }
  2300. \def\EndItemize{% 
  2301.     \EndAList
  2302.     \endgroup
  2303.     \global\advance\@ItemListDepth by -1
  2304. }
  2305. \catcode`\@ = 12
  2306. % Here the output of inputd ends "itemizel.tip".
  2307.  
  2308.  
  2309. % Here begins "ts-itize.tip".
  2310. % This macro source file is from the four volume series
  2311. % "TeX in Practice" by Stephan von Bechtolsheim, published
  2312. % 1993 by Springer-Verlag, New York.
  2313. % Copyright 1993 Stephan von Bechtolsheim.
  2314. % No warranty or liability is assumed.
  2315. % This macro may be copied freely if no fees other than
  2316. % media cost or shipping charges are charged and as long
  2317. % as this copyright and the following source code itself
  2318. % is not changed. Please see the series for further information.
  2319. %
  2320. % Version: 1.0
  2321. % Date: May 1, 1993
  2322. %
  2323. %
  2324. % This source code is documented in 11.3.4, p. II-78.
  2325. % Original source in file "par2.TEX", starting line 1523.
  2326. \wlog{L: "ts-itize.tip" ["par2.TEX," l. 1523, p. II-78]}%
  2327. % This file DOES belong to format "texip."
  2328. \InputD{itemizel.tip}
  2329. \InputD{ts-fonts.tip}
  2330. \catcode`\@ = 11
  2331. \def\@BeginItemizeLevelOne{% 
  2332.     \BeginAList
  2333.         {15pt}{0pt}{15pt}% 
  2334.         {12pt}{0pt}%
  2335.         {0pt}{15pt}%
  2336. }
  2337. \def\@BeginItemizeLevelTwo{% 
  2338.     \BeginAList
  2339.         {15pt}{0pt}{15pt}% 
  2340.         {6pt}{0pt}%
  2341.         {0pt}{15pt}%
  2342. }
  2343. \def\@BeginItemizeLevelThree{%
  2344.     \BeginAList
  2345.         {15pt}{0pt}{15pt}% 
  2346.         {4pt}{0pt}%
  2347.         {0pt}{15pt}%
  2348. }
  2349. \def\@BeginItemizeLevelFour{%
  2350.     \BeginAList
  2351.         {15pt}{0pt}{15pt}% 
  2352.         {4pt}{0pt}%
  2353.         {0pt}{15pt}%
  2354. }
  2355. \catcode`\@ = 12
  2356. % Here the output of inputd ends "ts-itize.tip".
  2357.  
  2358.  
  2359. % Here begins "box-zero.tip".
  2360. % This macro source file is from the four volume series
  2361. % "TeX in Practice" by Stephan von Bechtolsheim, published
  2362. % 1993 by Springer-Verlag, New York.
  2363. % Copyright 1993 Stephan von Bechtolsheim.
  2364. % No warranty or liability is assumed.
  2365. % This macro may be copied freely if no fees other than
  2366. % media cost or shipping charges are charged and as long
  2367. % as this copyright and the following source code itself
  2368. % is not changed. Please see the series for further information.
  2369. %
  2370. % Version: 1.0
  2371. % Date: May 1, 1993
  2372. %
  2373. %
  2374. % This source code is documented in 4.5.13, p. I-104.
  2375. % Original source in file "reg2.TEX", starting line 1348.
  2376. \wlog{L: "box-zero.tip" ["reg2.TEX," l. 1348, p. I-104]}%
  2377. % This file DOES belong to format "texip."
  2378. \def\ZeroBox #1{%
  2379.     \wd#1 = 0pt
  2380.     \ht#1 = 0pt
  2381.     \dp#1 = 0pt
  2382. }
  2383. \def\ZeroBoxOut #1{%
  2384.     \ZeroBox{#1}%
  2385.     \box#1%
  2386. }
  2387. % Here the output of inputd ends "box-zero.tip".
  2388.  
  2389.  
  2390. % Here begins "box-bul.tip".
  2391. % This macro source file is from the four volume series
  2392. % "TeX in Practice" by Stephan von Bechtolsheim, published
  2393. % 1993 by Springer-Verlag, New York.
  2394. % Copyright 1993 Stephan von Bechtolsheim.
  2395. % No warranty or liability is assumed.
  2396. % This macro may be copied freely if no fees other than
  2397. % media cost or shipping charges are charged and as long
  2398. % as this copyright and the following source code itself
  2399. % is not changed. Please see the series for further information.
  2400. %
  2401. % Version: 1.0
  2402. % Date: May 1, 1993
  2403. %
  2404. %
  2405. % This source code is documented in 9.3.4.1, p. I-322.
  2406. % Original source in file "boxit.TEX", starting line 472.
  2407. \wlog{L: "box-bul.tip" ["boxit.TEX," l. 472, p. I-322]}%
  2408. % This file DOES belong to format "texip."
  2409. \InputD{box-zero.tip}
  2410. \catcode`\@ = 11
  2411. \newbox\@BulletBox
  2412. \setbox\@BulletBox =
  2413.     \hbox{% 
  2414.         \hskip -2.3pt
  2415.         \lower 2.5pt \hbox{$\bullet$}% 
  2416.     }
  2417. \ZeroBox{\@BulletBox}
  2418. \catcode`\@ = 12
  2419. % Here the output of inputd ends "box-bul.tip".
  2420.  
  2421.  
  2422. % Here begins "box-bb.tip".
  2423. % This macro source file is from the four volume series
  2424. % "TeX in Practice" by Stephan von Bechtolsheim, published
  2425. % 1993 by Springer-Verlag, New York.
  2426. % Copyright 1993 Stephan von Bechtolsheim.
  2427. % No warranty or liability is assumed.
  2428. % This macro may be copied freely if no fees other than
  2429. % media cost or shipping charges are charged and as long
  2430. % as this copyright and the following source code itself
  2431. % is not changed. Please see the series for further information.
  2432. %
  2433. % Version: 1.0
  2434. % Date: May 1, 1993
  2435. %
  2436. %
  2437. % This source code is documented in 9.3.4.1, p. I-323.
  2438. % Original source in file "boxit.TEX", starting line 495.
  2439. \wlog{L: "box-bb.tip" ["boxit.TEX," l. 495, p. I-323]}%
  2440. % This file DOES belong to format "texip."
  2441. \catcode`\@ = 11
  2442. \newbox\@BoxingBox
  2443. \newbox\@BaseLineLeaders
  2444. \catcode`\@ = 12
  2445. % Here the output of inputd ends "box-bb.tip".
  2446.  
  2447.  
  2448. % Here begins "box-thck.tip".
  2449. % This macro source file is from the four volume series
  2450. % "TeX in Practice" by Stephan von Bechtolsheim, published
  2451. % 1993 by Springer-Verlag, New York.
  2452. % Copyright 1993 Stephan von Bechtolsheim.
  2453. % No warranty or liability is assumed.
  2454. % This macro may be copied freely if no fees other than
  2455. % media cost or shipping charges are charged and as long
  2456. % as this copyright and the following source code itself
  2457. % is not changed. Please see the series for further information.
  2458. %
  2459. % Version: 1.0
  2460. % Date: May 1, 1993
  2461. %
  2462. %
  2463. % This source code is documented in 9.3.3, p. I-321.
  2464. % Original source in file "boxit.TEX", starting line 405.
  2465. \wlog{L: "box-thck.tip" ["boxit.TEX," l. 405, p. I-321]}%
  2466. % This file DOES belong to format "texip."
  2467. \newdimen\BoxRuleThickness
  2468. \BoxRuleThickness = 0.4pt
  2469. % Here the output of inputd ends "box-thck.tip".
  2470.  
  2471.  
  2472. % Here begins "boxing5.tip".
  2473. % This macro source file is from the four volume series
  2474. % "TeX in Practice" by Stephan von Bechtolsheim, published
  2475. % 1993 by Springer-Verlag, New York.
  2476. % Copyright 1993 Stephan von Bechtolsheim.
  2477. % No warranty or liability is assumed.
  2478. % This macro may be copied freely if no fees other than
  2479. % media cost or shipping charges are charged and as long
  2480. % as this copyright and the following source code itself
  2481. % is not changed. Please see the series for further information.
  2482. %
  2483. % Version: 1.0
  2484. % Date: May 1, 1993
  2485. %
  2486. %
  2487. % This source code is documented in 9.3.6.1, p. I-327.
  2488. % Original source in file "boxit.TEX", starting line 719.
  2489. \wlog{L: "boxing5.tip" ["boxit.TEX," l. 719, p. I-327]}%
  2490. % This file DOES belong to format "texip."
  2491. \InputD{box-zero.tip}
  2492. \InputD{box-bul.tip}
  2493. \InputD{box-bb.tip}
  2494. \InputD{box-thck.tip}
  2495. \catcode`\@ = 11
  2496. \newif\ifBulletAndBaseLine
  2497. \BulletAndBaseLinetrue
  2498. \def\RulesOutSide #1#2#3{% 
  2499.     {%
  2500.         \setbox 0 = \hbox{%
  2501.             \ifBulletAndBaseLine
  2502.                 \copy\@BulletBox
  2503.             \fi
  2504.             \hskip -\BoxRuleThickness
  2505.             \vrule width \BoxRuleThickness height #1 depth #2% 
  2506.             \hskip #3%
  2507.             \vrule width \BoxRuleThickness height #1 depth #2%
  2508.             \dimen0 = #3% 
  2509.             \advance \dimen0 by 2\BoxRuleThickness
  2510.             \hskip -\dimen0
  2511.             \dimen2 = #1%
  2512.             \advance\dimen2 by \BoxRuleThickness
  2513.             \vrule width \dimen0 height \dimen2 depth -#1% 
  2514.             \hskip -\dimen0
  2515.             \dimen2 = #2% 
  2516.             \advance\dimen2 by \BoxRuleThickness
  2517.             \vrule width \dimen0 height -#2 depth \dimen2
  2518.         }%
  2519.         \ZeroBoxOut{0}% 
  2520.     }% 
  2521. }
  2522. \def\RulesInSide #1#2#3{% 
  2523.     {%
  2524.         \setbox 0 = \hbox{%
  2525.             \ifBulletAndBaseLine
  2526.                 \copy\@BulletBox
  2527.             \fi
  2528.             \vrule width \BoxRuleThickness height #1 depth #2% 
  2529.             \hskip #3% 
  2530.             \hskip -\BoxRuleThickness
  2531.             \hskip -\BoxRuleThickness
  2532.             \vrule width \BoxRuleThickness height #1 depth #2% 
  2533.             \hskip -#3% 
  2534.             \dimen2 = #1% 
  2535.             \advance\dimen2 by -\BoxRuleThickness
  2536.             \vrule width #3 height #1 depth -\dimen2
  2537.             \hskip -#3% 
  2538.             \dimen2 = #2% 
  2539.             \advance\dimen2 by -\BoxRuleThickness
  2540.             \vrule width #3 height -\dimen2 depth #2% 
  2541.         }%
  2542.         \ZeroBoxOut{0}% 
  2543.     }% 
  2544. }
  2545. \def\RulesOnSide #1#2#3{% 
  2546.     {%
  2547.         \setbox 0 = \hbox{% 
  2548.             \ifBulletAndBaseLine
  2549.                 \copy\@BulletBox
  2550.             \fi
  2551.             \hskip -0.5\BoxRuleThickness
  2552.             \vrule width \BoxRuleThickness height #1 depth #2% 
  2553.             \hskip #3% 
  2554.             \hskip -\BoxRuleThickness
  2555.             \vrule width \BoxRuleThickness height #1 depth #2% 
  2556.             \hskip -#3% 
  2557.             \hskip -\BoxRuleThickness
  2558.             \dimen0 = #3% 
  2559.             \advance\dimen0 by \BoxRuleThickness
  2560.             \dimen2 = #1% 
  2561.             \advance\dimen2 by 0.5\BoxRuleThickness
  2562.             \dimen4 = #1% 
  2563.             \advance\dimen4 by -0.5\BoxRuleThickness
  2564.             \dimen4 = -\dimen4
  2565.             \vrule width \dimen0 height \dimen2 depth \dimen4
  2566.             \hskip -\dimen0
  2567.             \dimen2 = #2% 
  2568.             \advance\dimen2 by -0.5\BoxRuleThickness
  2569.             \dimen2 = -\dimen2
  2570.             \dimen4 = #2% 
  2571.             \advance\dimen4 by 0.5\BoxRuleThickness
  2572.             \vrule width \dimen0 height \dimen2 depth \dimen4
  2573.         }%
  2574.         \ZeroBoxOut{0}% 
  2575.     }% 
  2576. }
  2577. \catcode`\@ = 12
  2578. % Here the output of inputd ends "boxing5.tip".
  2579.  
  2580.  
  2581. % Here begins "boxing6.tip".
  2582. % This macro source file is from the four volume series
  2583. % "TeX in Practice" by Stephan von Bechtolsheim, published
  2584. % 1993 by Springer-Verlag, New York.
  2585. % Copyright 1993 Stephan von Bechtolsheim.
  2586. % No warranty or liability is assumed.
  2587. % This macro may be copied freely if no fees other than
  2588. % media cost or shipping charges are charged and as long
  2589. % as this copyright and the following source code itself
  2590. % is not changed. Please see the series for further information.
  2591. %
  2592. % Version: 1.0
  2593. % Date: May 1, 1993
  2594. %
  2595. %
  2596. % This source code is documented in 9.3.7, p. I-332.
  2597. % Original source in file "boxit.TEX", starting line 996.
  2598. \wlog{L: "boxing6.tip" ["boxit.TEX," l. 996, p. I-332]}%
  2599. % This file DOES belong to format "texip."
  2600. \InputD{box-zero.tip}
  2601. \InputD{boxing5.tip}
  2602. \catcode`\@ = 11
  2603. \def\BoxingE #1{%
  2604.     \hbox{% 
  2605.         \setbox\@BoxingBox = #1%
  2606.         \setbox\@BaseLineLeaders = \hbox to \wd\@BoxingBox{%
  2607.             \xleaders\hbox to 4pt{%
  2608.                 \hskip 1pt
  2609.                 \vrule depth 0.4pt height 0.4pt width 2pt
  2610.                 \hfil
  2611.             }%
  2612.             \hfil
  2613.         }%
  2614.         \ZeroBox{\@BaseLineLeaders}% 
  2615.         \ifBulletAndBaseLine
  2616.             \box\@BaseLineLeaders
  2617.         \fi
  2618.         \RulesOnSide
  2619.             {\ht\@BoxingBox}%
  2620.             {\dp\@BoxingBox}% 
  2621.             {\wd\@BoxingBox}% 
  2622.         \box\@BoxingBox
  2623.     }%
  2624. }
  2625. \catcode`\@ = 12
  2626. % Here the output of inputd ends "boxing6.tip".
  2627.  
  2628.  
  2629. % Here begins "vcentx.tip".
  2630. % This macro source file is from the four volume series
  2631. % "TeX in Practice" by Stephan von Bechtolsheim, published
  2632. % 1993 by Springer-Verlag, New York.
  2633. % Copyright 1993 Stephan von Bechtolsheim.
  2634. % No warranty or liability is assumed.
  2635. % This macro may be copied freely if no fees other than
  2636. % media cost or shipping charges are charged and as long
  2637. % as this copyright and the following source code itself
  2638. % is not changed. Please see the series for further information.
  2639. %
  2640. % Version: 1.0
  2641. % Date: May 1, 1993
  2642. %
  2643. %
  2644. % This source code is documented in 7.5.5, p. I-249.
  2645. % Original source in file "vboxes1.TEX", starting line 2107.
  2646. \wlog{L: "vcentx.tip" ["vboxes1.TEX," l. 2107, p. I-249]}%
  2647. % This file DOES belong to format "texip."
  2648. \catcode`\@ = 11
  2649. \newbox\@VcenterXBox
  2650. \newdimen\@VcenterDimen
  2651. \def\VcenterX{% 
  2652.     \hbox\bgroup
  2653.         \mathsurround = 0pt
  2654.     \futurelet\@VCenterXToken\@VCenterXA
  2655. }
  2656. \def\@VCenterXA{%
  2657.     \ifx\@VCenterXToken\bgroup
  2658.         \let\@VcenterXNext = \@VcenterXOrdinary
  2659.     \else
  2660.         \ifx\@VCenterXToken t%
  2661.             \let\@VcenterXNext = \@VcenterXTo
  2662.         \else
  2663.             \let\@VcenterXNext = \@VcenterXSpread
  2664.         \fi
  2665.     \fi
  2666.     \@VcenterXNext
  2667. }
  2668. \def\@VcenterXOrdinary{%
  2669.     \def\@VcenterCommand{\vcenter}%
  2670.     \afterassignment\@VcenterXB
  2671.     \let\@VcenterDrop =
  2672. }
  2673. \def\@VcenterXTo to{% 
  2674.     \def\@VcenterCommand{to}%
  2675.     \afterassignment\@VcenterXToSpread
  2676.     \@VcenterDimen =
  2677. }
  2678. \def\@VcenterXSpread spread{% 
  2679.     \def\@VcenterCommand{spread}%
  2680.     \afterassignment\@VcenterXToSpread
  2681.     \@VcenterDimen =
  2682. }
  2683. \def\@VcenterXToSpread{%
  2684.     \edef\@VcenterCommand{% 
  2685.         \vcenter\@VcenterCommand \the\@VcenterDimen
  2686.     }%
  2687.     \afterassignment\@VcenterXB
  2688.     \let\@VcenterDrop =
  2689. }
  2690. \def\@VcenterXB{%
  2691.     \setbox\@VcenterXBox = \hbox\bgroup
  2692.         $%
  2693.         \@VcenterCommand\bgroup
  2694.     \aftergroup\@VcenterXC
  2695. }
  2696. \def\@VcenterXC{%
  2697.     $%
  2698.     \egroup
  2699.     \box\@VcenterXBox
  2700.     \egroup
  2701. }
  2702. \catcode`\@ = 12
  2703. % Here the output of inputd ends "vcentx.tip".
  2704.  
  2705.  
  2706. % Here begins "boxing7.tip".
  2707. % This macro source file is from the four volume series
  2708. % "TeX in Practice" by Stephan von Bechtolsheim, published
  2709. % 1993 by Springer-Verlag, New York.
  2710. % Copyright 1993 Stephan von Bechtolsheim.
  2711. % No warranty or liability is assumed.
  2712. % This macro may be copied freely if no fees other than
  2713. % media cost or shipping charges are charged and as long
  2714. % as this copyright and the following source code itself
  2715. % is not changed. Please see the series for further information.
  2716. %
  2717. % Version: 1.0
  2718. % Date: May 1, 1993
  2719. %
  2720. %
  2721. % This source code is documented in 9.3.9.1, p. I-335.
  2722. % Original source in file "boxit.TEX", starting line 1131.
  2723. \wlog{L: "boxing7.tip" ["boxit.TEX," l. 1131, p. I-335]}%
  2724. % This file DOES belong to format "texip."
  2725. \InputD{boxing6.tip}
  2726. \InputD{vcentx.tip}
  2727. \catcode`\@ = 11
  2728. \newdimen\@BoxRDimen
  2729. \newbox\@BoxRBox
  2730. \newcount\@BoxRNumber
  2731. \def\HboxR{%
  2732.     \hbox\bgroup
  2733.     \def\@WhichBox{\hbox}%
  2734.     \def\@WhichBoxDimen{}%
  2735.     \@BoxRaa
  2736. }
  2737. \def\VboxR{%
  2738.     \vbox\bgroup
  2739.     \def\@WhichBox{\vbox}%
  2740.     \def\@WhichBoxDimen{}%
  2741.     \@BoxRaa
  2742. }
  2743. \def\VtopR{%
  2744.     \vtop\bgroup
  2745.     \def\@WhichBox{\vtop}%
  2746.     \def\@WhichBoxDimen{}%
  2747.     \@BoxRaa
  2748. }
  2749. \def\VcenterXR{%
  2750.     \hbox\bgroup
  2751.     \def\@WhichBox{\VcenterX}%
  2752.     \def\@WhichBoxDimen{}%
  2753.     \@BoxRaa
  2754. }
  2755. \def\BoxR{%
  2756.     \hbox\bgroup
  2757.     \def\@WhichBox{\hbox}%
  2758.     \def\@WhichBoxDimen{}%
  2759.     \afterassignment\@BoxRB
  2760.     \@BoxRNumber =
  2761. }
  2762. \def\@BoxRB{%
  2763.     \HboxR{\box\@BoxRNumber}% 
  2764.     \egroup
  2765. }
  2766. \def\CopyR{%
  2767.     \hbox\bgroup
  2768.     \def\@WhichBox{\hbox}%
  2769.     \def\@WhichBoxDimen{}%
  2770.     \afterassignment\@CopyRbb
  2771.     \@BoxRNumber =
  2772. }
  2773. \def\@CopyRbb{%
  2774.     \HboxR{\copy\@BoxRNumber}% 
  2775.     \egroup
  2776. }
  2777. \def\@BoxRaa{% 
  2778.     \futurelet\@BoxRSymbol\@BoxRA
  2779. }
  2780. \def\@BoxRA{%
  2781.     \ifx\@BoxRSymbol\bgroup
  2782.         \let\@BoxitNext = \@BoxRb
  2783.     \else
  2784.         \if\@BoxRSymbol t% 
  2785.             \let\@BoxitNext = \@BoxRbTo
  2786.         \else
  2787.             \let\@BoxitNext = \@BoxRbSpread
  2788.         \fi
  2789.     \fi
  2790.     \@BoxitNext
  2791. }
  2792. \def\@BoxRb{%
  2793.     \afterassignment\@BoxRbTwo
  2794.     \let\@BoxDrop =
  2795. }
  2796. \def\@BoxRbTwo{% 
  2797.     \setbox\@BoxRBox = \expandafter\@WhichBox\@WhichBoxDimen\bgroup
  2798.     \aftergroup\@BoxRbThree
  2799. }
  2800. \def\@BoxRbThree{% 
  2801.     \BoxingE{\box\@BoxRBox}% 
  2802.     \egroup
  2803. }
  2804. \def\@BoxRbTo to{%
  2805.     \def\@WhichBoxDimen{to}% 
  2806.     \afterassignment\@BoxRbMoreSpreadTo
  2807.     \@BoxRDimen =
  2808. }
  2809. \def\@BoxRbSpread spread{%
  2810.     \def\@WhichBoxDimen{spread}%
  2811.     \afterassignment\@BoxRbMoreSpreadTo
  2812.     \@BoxRDimen =
  2813. }
  2814. \def\@BoxRbMoreSpreadTo{%
  2815.     \edef\@WhichBoxDimen{\@WhichBoxDimen \the\@BoxRDimen}% 
  2816.     \afterassignment\@BoxRbTwo
  2817.     \let\@BoxDrop =
  2818. }
  2819. \catcode`\@ = 12
  2820. % Here the output of inputd ends "boxing7.tip".
  2821.  
  2822.  
  2823. % Here begins "bugreport.tex".
  2824. \def\BugReport #1#2#3#4#5#6#7{%
  2825.     \par
  2826.     \bigskip
  2827.     \noindent
  2828.     {\bf Bug #1} (% 
  2829.     date: #2%
  2830.     \if\EmptyStringConditional{#3}%
  2831.         , section #3
  2832.     \fi
  2833.     (internal name: {\tt #4.TEX}),
  2834.     page~#5%
  2835.     \if\EmptyStringConditional{#6}%
  2836.         ).
  2837.     \else
  2838.         , #6).
  2839.     \fi
  2840.     \if\EmptyStringConditional{#7}%
  2841.         No macro source file is affected by this bug.
  2842.     \else
  2843.         Macro source file(s) affected by this bug:
  2844.         {\tt #7}.
  2845.     \fi
  2846.     \par
  2847. }
  2848. % Here the output of inputd ends "bugreport.tex".
  2849. % Here it ends!
  2850. \ListInputD
  2851. \def\RCSInfo $#1 ${%
  2852.     \bigskip
  2853.     \centerline{\bf RCS Information: \tt#1}
  2854. }
  2855. \InputD{ts-verb.tip}
  2856. \InputD{ts-lazy.tip}
  2857. \InputD{ts-brefm.tip}
  2858. \InputD{itemizel.tip}
  2859. \InputD{ts-itize.tip}
  2860. \InputD{boxing7.tip}
  2861. \InputD{compst.tip}
  2862. \InputD{bugreport.tex}
  2863.  
  2864. \vsize = 7.4in
  2865.  
  2866. \centerline{\bf Bug List, Version 2.0, ``\TeX{} in Practice, ''
  2867.     September~15, 1993}
  2868.                     \centerline{Stephan v. Bechtolsheim}
  2869. % ============================================================
  2870.  
  2871. \RCSInfo $Id: bugs.TEX,v 1.50 1993/09/15 11:20:13 svb Exp svb $
  2872.  
  2873.     Copyright $\copyright$ 1993 Stephan v.~Bechtolsheim. This file may
  2874. be copied as many times as you want, at any place in the world,
  2875. {\it as long as you make no changes\/} to this file.
  2876.  
  2877.     This is the list of known bugs, grammatical errors, and so forth of
  2878. ``\TeX{} in Practice.''
  2879.  
  2880.     If you have access to email please send any bug reports to
  2881. {\tt svb@rcmcon.com}. If not, please send your corrections to Springer-Verlag
  2882. at 175 Fifth Avenue, New York, NY 10010.
  2883.  
  2884.     This file can be processed with plain \TeX{} (all required macros are
  2885. prepended).
  2886.  
  2887. Note the following history of this document:
  2888. \BeginItemize
  2889.     \Item September 10, 1993, Version 1.0: bugs 1--21.
  2890.     \Item September 15, 1993, Version 2.0: bugs 22--26.
  2891. \EndItemize
  2892.  
  2893. Some further remarks:
  2894. \BeginItemize
  2895.     \Item If the ASCII form of the index changes due to some bug fix,
  2896.         then this will not be listed here.
  2897.     \Item If you have access to {\tt ftp} the easiest solution is any
  2898.         way to always retrieve the complete distribution instead of
  2899.         relying on patches.
  2900. \EndItemize
  2901.  
  2902. And here is where the bug reports start:
  2903.  
  2904. \BugReport{1}{9/9/93}{20}{macros7}{III-376 and 392}{}{norpweek.tip,
  2905.     weekofyr.tip}
  2906.     Two files {\tt norpweek.tip} and {\tt weekofyr.tip} were listed as not
  2907.     belonging to the \TeXIP{} format. Well, that was an oversight which is
  2908.     fixed now.
  2909. \BugReport{2}{9/9/93}{18}{tokens1}{III-58 to III-59}{}{ts-verb.tip}
  2910.     I added {\tt .flf2} files (besides {\tt .flf} files)
  2911.     to be treated as {\tt log} files. I have
  2912.     now two ways of generating {\tt log} files in the series:
  2913.     {\tt flf} files use the plain format, {\tt flf2}
  2914.     files use the \TeXIP{} format. Both {\it appear\/} as {\tt log}
  2915.     files.
  2916.  
  2917.         This is more than anything else an internal change, {\it but\/}
  2918.     it does affect {\tt ts-verb.tip}.
  2919. \BugReport{3}{6/12/93}{23}{table1}{III-34}{}{tabswb.tip}
  2920.     There was an extra \verb+\input inputd.tip+ at the beginning of
  2921.     {\tt tabswb.tip} which I removed. The file {\tt tabswb.tip} is now
  2922.     version~1.1.
  2923.  
  2924. \BugReport{4}{7/24/93}{7.3.4}{vboxes1}{I-221}{7th line from top}{}
  2925.     It should read ``1~pt'' instead of ``1pt.''
  2926.  
  2927. \BugReport{5}{7/24/93}{2.8.2}{intro}{I-27}{second paragraph of 12.
  2928.     last line of that paragraph: exchange double quote and period.}{}
  2929.  
  2930. \BugReport{6}{7/24/98}{Bibliography}{biback}{I-346}{after Knuth~DE
  2931.     1990}{} Forgotten entry for \Bref{Knuth DE}{92}{} Literate Programming.
  2932.     CLSI Lecture Notes Number 27, Center for Study of Language and
  2933.     Information.
  2934.  
  2935. \BugReport{7}{8/4/93}{}{General Remarks $\ldots$}{I-x, II-y, III-z,
  2936.     IV-a}{Item ``Volume IV''}{}
  2937.     The chapters listed in this item are in the wrong order. First
  2938.     the table chapters are listed, then the output routine chapters.
  2939.     This is an oversight resulting from an attempt to reverse the order
  2940.     of chapters in Volume~IV\null. This had to be abandoned, because the
  2941.     covers of the books were already printed.
  2942.  
  2943.     Anyway, here is the correct overview of chapters in Volume~IV:
  2944.     \BeginItemize
  2945.         \Item Chapter~32 discusses the determination of page breaks
  2946.             by \TeX.
  2947.         \Item Chapter~33 discusses the basics of output routines,
  2948.             and introduces concepts like logical and physical
  2949.             pages.
  2950.         \Item Chapter~34 presents some simple output routines.
  2951.         \Item Chapter~35 discusses the output routine of the
  2952.             plain format and variations of it.
  2953.         \Item Chapter~36 discusses output routines with insertions.
  2954.         \Item Chapter~37 discusses double column output routines.
  2955.         \Item Chapter~38 begins the discussion of tables typeset
  2956.             with \TeX's \verb+\halign+ instruction.
  2957.         \Item Chapter~39 also discusses tables, including vertical
  2958.             spacing, struts and rules in tables.
  2959.         \Item Chapter~40 discusses the centering of tables, tables
  2960.             and paragraphs and preamble related macros.
  2961.         \Item Chapter~41 discusses numerical computations in tables,
  2962.             splitting tables, \verb+\valign+ and double tables.
  2963.     \EndItemize
  2964.  
  2965. \BugReport{8}{8/6/93}{General Notes, 6~Contacting the
  2966.     Author}{manage/prel*}{I-xxxix}
  2967.     {End of 4th line of first paragraph after title line}{}
  2968.     Text omits {\it any\/}: please do not use {\it any\/} of Springer's
  2969.     FAX numbers.
  2970. \BugReport{9}{8/9/93}{3.2.1}{reg1}{I-38}{Beginning of paragraph
  2971.     preceding ``3.2.2~Arithmetic in \TeX''}{}
  2972.     The paragraph's beginning should read: ``{\it Here a note to readers
  2973.     familiar $\ldots\,$}.''
  2974. \BugReport{10}{8/9/93}{3.3.3.1}{reg1}{I-44}{Paragraph after 3.3.3.1
  2975.     title}{}
  2976.     The first paragraph after this title should read: ``The preceding
  2977.     explanation may have sound very theoretical, so consider the following
  2978.     example.'' (Delete ``an,'' delete the sentence ``Look $\ldots$
  2979.     code:'').
  2980. \BugReport{11}{8/9/93}{3.3.8.1}{reg1}{I-50}{8 lines from bottom}{}
  2981.     Instead of ``The'' write ``Then.''
  2982. \BugReport{12}{8/9/93}{3.3.9}{reg1}{I-52}{14th line from top}{}
  2983.     Replace ``following'' by ``obey.''
  2984. \BugReport{13}{8/9/93}{5.4.1}{glueetc}{I-136}{14th line from top}{}
  2985.     Replace ``show'' by ``some.''
  2986. \BugReport{14}{8/9/93}{5.6}{glueetc}{I-145}{Last sentence of~``2.''}{}
  2987.     Replace second occurrence of ``replicated'' by ``box.''
  2988. \BugReport{15}{8/9/93}{5.6.2}{glueetc}{I-147}{7th line from bottom}{}
  2989.     Replace ``will be not'' by ``will not be.''
  2990. \BugReport{16}{8/9/93}{5.7}{glueetc}{I-154}{1st line of 1st paragraph
  2991.     after 5.7~Rules title}{}
  2992.     Replace ``as it used'' by ``as it is used.''
  2993. \BugReport{17}{8/9/93}{6.2.8}{boxes}{I-167}{5th line from bottom}{}
  2994.     Replace ``end an box'' by ``end a box.''
  2995. \BugReport{18}{8/9/93}{6.3.1}{boxes}{I-168}{2nd line of first paragraph
  2996.     after 6.3.1 title}{}
  2997.     \verb+\HboxR{ABC}+ was not supposed to be printed verbatim, it
  2998.     was supposed to read \HboxR{ABC}.
  2999. \BugReport{19}{8/9/93}{6.3.7}{boxes}{I-173}{8th line from top}{}
  3000.     Add closing parenthesis at the very end of the sentence.
  3001. \BugReport{20}{8/10/93}{16.3.5}{fonts2}{II-289}{1st line after 16.3.5
  3002.     title line}{}
  3003.     Replace the word ``discussed'' by ``computed.''
  3004. \BugReport{21}{9/10/93}{28.4.3.2}{io1}{III-469}{}{inputd.tip}
  3005.     The order in which information was written to the {\tt .ipd} file
  3006.     and new files were pulled in through \verb+\InputD+ calls in the
  3007.     ``current file'' was reversed. That has been fixed.
  3008. \BugReport{22}{9/11/93}{2.7.1}{intro}{I-16}{middle of page, 2., line~3}{}
  3009.     Rewrite as follows: ``The~{\tt @} simply prints as~{\tt @}. Nevertheless
  3010.     this character requires special attention. It is frequently used
  3011.     inside macro packages as a letter, whereas outside
  3012.     macro packages it is used as a non-letter character (which
  3013.     simply prints when used).''
  3014. \BugReport{23}{9/11/93}{3.1}{reg1}{I-35}{middle of page}{}
  3015.     Use the following sentence: ``When we will discuss dimensions and glue
  3016.     parameters this process will become clearer'' instead of a similar to
  3017.     correctly worded sentence.
  3018. \BugReport{24}{9/11/93}{3.3.2.3}{reg1}{I-42}{5th and 6th line from top}{}
  3019.     Delete the whole sentence ``Preceding \TeX~3.0 (\TeX~2.9 is used as a
  3020.     generic version number for that purpose below) and version \TeX~3.0.''
  3021. \BugReport{25}{9/11/93}{6.2.5}{boxes}{I-165}{1st and 2nd line of 3rd
  3022.     paragraph from the top}{}
  3023.     Rewrite as follows: ``You might want to look {\it at\/} this macro
  3024.     definition.''
  3025. \BugReport{26}{9/13/93}{15.3.3}{fonts1}{II-248}{3rd line from top}{}
  3026.     Misspelled ``Cyrilic'' (one~`l' only). This also changes the index
  3027.     where the word is also misspelled.
  3028.  
  3029. \vfill\eject
  3030. \leftline{\large\bf Version Numbers}
  3031. % ==================================
  3032. This table is structured as follows:
  3033. \BeginItemize
  3034.     \Item Column 1: serial number.
  3035.     \Item Column 2: file name of macro source file.
  3036.     \Item Column 3: Version number of that file.
  3037.     \Item Column 4: file name of the chapter (information for the author).
  3038.     \Item Column 5: line number in that file (information for the author).
  3039. \EndItemize
  3040.  
  3041. {
  3042. \newcount\VersionNumbersLineNumber  
  3043.  
  3044.                             \tabskip = 0pt plus 1fil
  3045.     \halign to \hsize{
  3046.         #\relax                              % 1. Line number (entry not used).
  3047.         \global\advance\VersionNumbersLineNumber by 1
  3048.         \hfil\the\VersionNumbersLineNumber
  3049.                             \tabskip = 20pt&
  3050.         \tt#\hfil           \tabskip = 20pt&            % 2. file name
  3051.         \def\VersionNumber{#}%                          % 3. version number
  3052.         \if\StringsEqualConditional{\VersionNumber}{1.0}%
  3053.             1.0%
  3054.         \else
  3055.             {\bf \VersionNumber}%
  3056.         \fi
  3057.         \hfil               \tabskip = 20pt&
  3058.         \tt#\hfil           \tabskip = 20pt&            % 4. sourcefile
  3059.         \hfil#              \tabskip = 0pt plus 1fil    % 5. line number
  3060.     \cr
  3061.         \input macvntip.tex
  3062.     }
  3063.     There should be {\it 294\/} files listed in the preceding
  3064.     table. If this is not the case the table is wrong.
  3065.     Notify me immediately, please, if that should be the case.
  3066.     \ifnum\VersionNumbersLineNumber = 294
  3067.     \else
  3068.         {\bf ERROR: PRECEDING TABLE IS WRONG, DOES NOT CONTAIN
  3069.         CORRECT NUMBER OF FILES (which is 294)}.
  3070.     \fi
  3071.  
  3072.     {\bf I would like to take this opportunity to thank you all for
  3073.     your feedback.} Thank you again!
  3074. }
  3075. \bye
  3076.  
  3077.  
  3078. % Here begins the original definition of "inpud.tip".
  3079. % This macro source file is from the four volume series
  3080. % "TeX in Practice" by Stephan von Bechtolsheim, published
  3081. % 1993 by Springer-Verlag, New York.
  3082. % Copyright 1993 Stephan von Bechtolsheim.
  3083. % No warranty or liability is assumed.
  3084. % This macro may be copied freely if no fees other than
  3085. % media cost or shipping charges are charged and as long
  3086. % as this copyright and the following source code itself
  3087. % is not changed. Please see the series for further information.
  3088. %
  3089. % Version: 1.1
  3090. % Date: Sep 10, 1993
  3091. %
  3092. %
  3093. % This source code is documented in 28.4.3, p. III-468.
  3094. % Original source in file "io1.TEX", starting line 1076.
  3095. \wlog{L: "inputd.tip" ["io1.TEX," l. 1076, p. III-468]}%
  3096. % This file DOES belong to format "texip."
  3097. \input namedef.tip
  3098. \newif\ifInputDVerbose
  3099. \InputDVerbosefalse
  3100. \catcode`\@ = 11
  3101. \newif\if@InputDList
  3102. \@InputDListfalse
  3103. \def\@InputDPrefix{@InputD-}
  3104. \NameDef{\@InputDPrefix namedef.tip}{}
  3105. \def\InputD #1{% 
  3106.     \if\NameDefinedConditional{\@InputDPrefix #1}%
  3107.         \ifInputDVerbose
  3108.             \wlog{\string\InputD: file "#1" was read-in before.}%
  3109.         \fi
  3110.     \else
  3111.         \NameDef{\@InputDPrefix #1}{}% 
  3112.         \input #1
  3113.         \if@InputDList
  3114.             \immediate\write\@InputDStream{#1}% 
  3115.         \fi
  3116.     \fi
  3117. }
  3118. \catcode`\@ = 12
  3119. \InputD{inputdl.tip}
  3120.  
  3121.  
  3122. % Here begins the original definition of "inpudl.tip".
  3123. % This macro source file is from the four volume series
  3124. % "TeX in Practice" by Stephan von Bechtolsheim, published
  3125. % 1993 by Springer-Verlag, New York.
  3126. % Copyright 1993 Stephan von Bechtolsheim.
  3127. % No warranty or liability is assumed.
  3128. % This macro may be copied freely if no fees other than
  3129. % media cost or shipping charges are charged and as long
  3130. % as this copyright and the following source code itself
  3131. % is not changed. Please see the series for further information.
  3132. %
  3133. % Version: 1.0
  3134. % Date: May 1, 1993
  3135. %
  3136. %
  3137. % This source code is documented in 28.4.3.3, p. III-470.
  3138. % Original source in file "io1.TEX", starting line 1175.
  3139. \wlog{L: "inputdl.tip" ["io1.TEX," l. 1175, p. III-470]}%
  3140. % This file DOES belong to format "texip."
  3141. \catcode`\@ = 11
  3142. \newwrite\@InputDStream
  3143. \def\ListInputD{% 
  3144.     \@InputDListtrue
  3145.     \immediate\openout\@InputDStream = \jobname.ipd
  3146.     \immediate\write\@InputDStream{inputd.tip}%
  3147.     \immediate\write\@InputDStream{namedef.tip}%
  3148.     \immediate\write\@InputDStream{inputdl.tip}%
  3149. }
  3150. \catcode`\@ = 12
  3151.  
  3152.  
  3153. % End of stuff appended at the end.
  3154.